Loose-Info.com

Last Update 2019/12/25


TOP - Perl - 関数 - unlink

ファイルを削除します。

戻り値1 = unlink リスト値1

戻り値1
削除されたファイル数
リスト値1
削除するファイル名からなるリスト値

(例)
mkdir "test", 0755; open TESTOUT, ">test/test.txt" or die "error $!\n"; print TESTOUT "test\n"; close TESTOUT; opendir TESTDIR, "test" or die "error $!\n"; @a_dirs = readdir TESTDIR; closedir TESTDIR; print "削除前のディレクトリ内 : @a_dirs\n"; unlink("test/test.txt"); opendir TESTDIR, "test" or die "error $!\n"; @a_dirs = readdir TESTDIR; closedir TESTDIR; print "削除後のディレクトリ内 : @a_dirs\n";

実行結果
削除前のディレクトリ内 : . .. test.txt 削除後のディレクトリ内 : . ..