Opret en masse filer - 2* Perl lukker selv et genåbnet filehandle- close FIL væk* Vi er ligeglade med fejl- || die; væk* 0..10000 sparer tastetryk- for(...) => for $i (0..10000)* $_ sparer tastetryk- for $i (...) => for(0..10000)
perl -e 'for(0..10000){open(A,">$_"); print A "x"x1000;}'
|