Map using a block : Code Block « Language Basics « Perl
- Perl
- Language Basics
- Code Block
Map using a block
open(FH, "datebook.master") or die;
@lines=<FH>;
@fields = map { split(":") } @lines;
foreach $field (@fields){
print $field,"\n";
}
Related examples in the same category