Stackable File Tests ist eines der neuen Features von Perl 5.10.
Beispiel:
Perl 5.8.8
use strict;
use warnings;
my $file = 'some.file';
if ( -f $file and -w _ and -z _ ) {
unlink $file;
}
Perl 5.10.0
use strict;
use warnings;
use 5.010;
my $file = 'some.file';
if ( -f -w -z $file ) {
unlink $file;
}
Es ist zwar nur syntaktischer Zucker, aber ich finde es lesbarer und daher erwähnenswert.
Vorhergehende Artikel von mir zu den neuen Features in Perl 5.10:
Keine Kommentare:
Kommentar veröffentlichen