in reply to Making a match
#!/usr/bin/perl
my $x = 14;
my @ary=(10,11,12,13,14);
map{print "$x matches\n" if /^$x$/} @ary;
is nice to look at :)
|
---|
In Section
Seekers of Perl Wisdom
in reply to Making a match
|
---|