Hi, I have a list of element in array that I would like to match the pattern in logs file. I have hard time take element from array and matching it. More then weeks now and don't know where to find in man page. please help me. Here is my code.
#!/usr/bin/perl -w open ( FILE, " /var/log/cisco.log " ) || die "can't open cisco.log file!"; @cisco.log = <FILE>; close (FILE); @array = qw( BPDUGUARD FAN_FAIL ); # more then 2 elements in array while (<@cisco.log>){ foreach $line (@array){ $_ =~ $line; #DOESN'T WORK AND I AM STUCK.. print "$_\n"; #WANT TO PRINT THAT MATCH } } __END__ thanks for your help -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/