trying to grep out some info from my /etc/hosts file...just to get more
practice with Perl and well for my personal pleasure, too.
#!/usr/bin/perl
open (FILE, "/etc/hosts");
@lines = <FILE>;
close (FILE);
foreach $line (@lines){
if ($line =~ /pm1/){
print $line;
}
}
the problem with this is that it's printing out some hosts that i don't want
that also have pm1 at the end.
somehostpm1 but it also gets my dr hosts (dr-somehostpm1)
thoughts?
by the way, i had to jump the wifes car so i ended up missing out on the
meeting. gonna try to make the next one for sure, though.
_______________________________________________
kc mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/kc
