Select Code to Download

<mark@<redacted>.net>: host mx1.<redacted>.tnx.nl[193.200.132.171] sai
+d: 552 spam score exceeded threshold (#5.6.1) (in reply to end of DAT
+A command)
...
i also sent you a PM at perlmonks about colons ':' in the filenames wh
+en i tried to cpan install Mail::Box on a windows box

otherwise so far  i like what i see ....... thanks for all your work

my $groups=[ [
            \'DLKTYVR',
...

my $value=$unrefed->[1][1]; 
print Dumper $value;

 
## example t2hex($lineno,$inputline); 
sub t2hex { 
...
    print $id.' '.$lines[1]."\n"; 
   }

 
if ( (index($SourceLine,'#') > -1) && (index($SourceLine,'PAGES') > -1
+)) { 
  sub t2hex { 
...
  t2hex('huh',$SourceLine); 
}
                                }