KUJUNTI.ID MINISH3LL
Path : /proc/self/cwd/S3nd4l_Jepit_sym/root/proc/self/root/usr/share/perl5/Debconf/
(S)h3ll Cr3at0r :
F!le Upl0ad :
B-Con CMD Config cPanel C-Rdp D-Log Info Jump Mass Ransom Symlink vHost Zone-H
Current File : //proc/self/cwd/S3nd4l_Jepit_sym/root/proc/self/root/usr/share/perl5/Debconf/TmpFile.pm


#!/usr/bin/perl
# This file was preprocessed, do not edit!


package Debconf::TmpFile;
use warnings;
use strict;
use IO::File;
use Fcntl;
use File::Temp;


my $filename;

sub open {
	my $fh; # will be autovivified
	my $ext=shift || '';
	($fh, $filename) = File::Temp::tempfile(SUFFIX => $ext);
	return $fh;
}


sub filename {
	return $filename;
}


sub cleanup {
	unlink $filename;
}


1

© KUJUNTI.ID