Sigh ! My mind simply refuses to work. What must I do to print the number of
records $count in line 3.
Thanks
1. @array = qw ( hello world hello how are you );
2. $match = 'HEllo';
3. print "Your search for $match returns $subroutine $count
records<br>\n";
$subroutine = &count;
sub count {
foreach $record (@array){
if (grep /$match/i, $record) {
print $record;
$count++;
};
};
};
_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
