Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Wanet Telecoms Ltd on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. kokopoko

    Passing array from one perl script to another perl script

    The simple solution won't work because I'm putting an entire email into the array. So I can't do ($a,$b,$c,@arr)=qw (a b c 11 22 33 44);
  2. kokopoko

    Passing array from one perl script to another perl script

    Well I've still got issues. What I'm doing is forwarding an email to script1 which determines the subject line and then forwards it, after packing the email, to script2. Right now script1 is packing the email and forwarding the collapsed array. But script2 is having issues unpacking it...
  3. kokopoko

    Passing array from one perl script to another perl script

    Calling line: my @array=&unpack_array($ARGV[0]); The sub: sub unpack_array { my ($collapsed)=@_; my @array=split(/\|/,$collapsed); return @array; } Here's the code from script1 that collapses it: foreach $line(@array) { if($line=~/$subject1/) { my $collapsed; my $i=0...
  4. kokopoko

    Passing array from one perl script to another perl script

    my @array=split(/\|/,$collapsed); is still giving error Use of uninitialized value in split at email1checker.pl line 115. I'm going nuts trying to figure it out.
  5. kokopoko

    Passing array from one perl script to another perl script

    I need to do the exact same thing. When I use your code sub unpack_array { my ($collapsed)= @_; @array=split(/\|/,$collapsed); return @array; } I'm getting errors "Use of uninitialized value in split at email1checker.pl line 114"
  6. kokopoko

    MIME::Parser need help

    I've written a script that should parse emails sent to it by the .forward file. Problem is, it's not working. Can anyone tell what's wrong? It doesn't even print out the "got me an email" statement. The .foward file is |directorypath/file.pl. #!/usr/freeware/bin/perl use MIME::Parser; my...

Part and Inventory Search

Back
Top