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
削除後のディレクトリ内 : . ..


Copyright(C) 2006-2018 CLAYPOT. All Rights Reserved.