I guess I only gave you one piece of the puzzle. "ls" also errors if the file doesn't exist and (with the way this script is written) it causes the script to die. Using globs or File::Find prevents that from happening. Once we find that file, then we search it for "interesting strings" and send emails out.<br>
<br>Very basic Perl functionality, yet the original author didn't understand some basic concepts of Perl. Like how subroutines work, and the fact that not all variables need to be global.<br><br>Sorta reminds me with the Perl script I ran into 15 years ago that did `grep $str $filename` to search a file. :)<br>
<br>Yes, my little File::Find snippet works well! Now on to correct other sins committed in this script.<br><br><div class="gmail_quote">On Thu, Nov 6, 2008 at 2:39 PM, Kevin <span dir="ltr"><<a href="mailto:sharpestmarble@gmail.com">sharpestmarble@gmail.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">If "ls" is aliased to put filesizes in front, then you shouldn't count<br>
on ls being in /bin. Instead, you should figure out where it is.<br>
<br>
`which ls | grep -v alias | tr -d '\t'`<br>
<div><div></div><div class="Wj3C7c"><br>
On Thu, Nov 6, 2008 at 2:33 PM, Jay Hannah <<a href="mailto:jay@jays.net">jay@jays.net</a>> wrote:<br>
> Mike Hostetler wrote:<br>
>><br>
>> It's ironic that you put that, since that's pretty much the exact command<br>
>> I'm replacing. :) The problem is that one some of these systems "ls" is<br>
>> aliases to always put filesize in front (why? I don't know -- I find it<br>
>> annoying).<br>
>><br>
><br>
> You can't specify /bin/ls to avoid aliases?<br>
><br>
>> This is what I came up with after some googling and piecemailing.<br>
>> Anonymous<br>
>> subroutines are a good thing!<br>
>><br>
><br>
> Yay! So you're all set? :)<br>
><br>
> j<br>
><br>
><br>
> <blasphemy><br>
> I wonder if Windows PowerShell knocks this problem out of the park?<br>
><br>
> <a href="http://en.wikipedia.org/wiki/Windows_PowerShell" target="_blank">http://en.wikipedia.org/wiki/Windows_PowerShell</a><br>
> </blasphemy><br>
> _______________________________________________<br>
> Omaha-pm mailing list<br>
> <a href="mailto:Omaha-pm@pm.org">Omaha-pm@pm.org</a><br>
> <a href="http://mail.pm.org/mailman/listinfo/omaha-pm" target="_blank">http://mail.pm.org/mailman/listinfo/omaha-pm</a><br>
><br>
_______________________________________________<br>
Omaha-pm mailing list<br>
<a href="mailto:Omaha-pm@pm.org">Omaha-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/omaha-pm" target="_blank">http://mail.pm.org/mailman/listinfo/omaha-pm</a><br>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>Mike Hostetler<br><a href="http://mike.hostetlerhome.com/">http://mike.hostetlerhome.com/</a><br><br><br>