to convert the DATA1 / DATA2 to lowercase is left as an exercise for the reader :-)use strict; use warnings; my @filenames = qw{filename1 filename2 filename3}; my @datas =qw{DATA1 DATA2}; foreach my $filename (@filenames) { foreach my $data (@datas) { print "grep -c $data $filename \n"; } }
In reply to Re: Print array values
by si_lence
in thread Print array values
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |