Default page

Your IP: 216.73.216.91
Server IP: 157.245.101.34
Server: Linux skvinfotech-website 5.4.0-131-generic #147-Ubuntu SMP Fri Oct 14 17:07:22 UTC 2022 x86_64
Server Software: Apache/2.4.41 (Ubuntu)
PHP Version: 7.4.33
Buat File | Buat Folder

View File Name : TmpFile.pm

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


package Debconf::TmpFile;
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