[lug] evolution signature script
Zan Lynx
zlynx at acm.org
Thu Nov 4 16:23:01 MST 2004
On Thu, 2004-11-04 at 16:08 -0700, Jason Davis wrote:
> On Thu, 2004-11-04 at 15:19, John Hernandez wrote:
> > A simplistic workaround might be to call perl from bash ;)
>
> I tried that too ... didnt work :(
>
> here is the script
>
> #!/usr/bin/perl -w
> my $sf='signatures.txt';
> my $sd='<|||>';
> $/ = $sd;
> open FILE,$sf;
> $_ = $con[(rand(@con = <FILE>))];
> close FILE;
> chomp;
> print;
>
>
> my sig file looks like
>
> sig1
> <|||>
> sig2
> <|||>
> sig 3
>
> evo version:1.4.6-5
>
> thanks
> jd
I noticed your script just uses 'signatures.txt' and has no error
handling. Try using a full path name, and also put '|| die' after your
open.
I am thinking that maybe Evo isn't running in the directory that you
expect.
--
Zan Lynx <zlynx at acm.org>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 189 bytes
Desc: This is a digitally signed message part
URL: <http://lists.lug.boulder.co.us/pipermail/lug/attachments/20041104/1b03f711/attachment.pgp>
More information about the LUG
mailing list