✏️ 正在编辑: TmpFile.pm
路径:
/snap/core/17292/usr/share/perl5/Debconf/TmpFile.pm
提示:
您可以编辑任何文件（包括二进制文件），但请注意不当修改可能导致文件损坏。
#!/usr/bin/perl # This file was preprocessed, do not edit! package Debconf::TmpFile; use strict; use IO::File; use Fcntl; my $filename; sub open { my $fh; # will be autovivified my $ext=shift || ''; do { $filename=POSIX::tmpnam().$ext } until sysopen($fh, $filename, O_WRONLY|O_TRUNC|O_CREAT|O_EXCL, 0600); return $fh; } sub filename { return $filename; } sub cleanup { unlink $filename; } 1
💾 保存文件
← 返回文件管理器