Here's the list of tips
open my $data_fh, 'data.txt' or die $!; open my $log_fh, '>>', 'logfile.txt' or die $!; while (<$data_fh>) { chomp; next if /^\s*$/; my ($domain, $IP) = split ','; if ($ip_obj->{src_ip} eq $IP){ print $log_fh "$domain has been found"; } }
In reply to Re^3: To Split or Not to Split
by wind
in thread To Split or Not to Split
by burningredmoon
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |