Help for this page

Select Code to Download


  1. or download this
    
    <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
    
  2. or download this
    my $groups=[ [
                \'DLKTYVR',
    ...
    
    my $value=$unrefed->[1][1]; 
    print Dumper $value;
    
  3. or download this
     
    ## example t2hex($lineno,$inputline); 
    sub t2hex { 
    ...
        print $id.' '.$lines[1]."\n"; 
       }
    
  4. or download this
     
    if ( (index($SourceLine,'#') > -1) && (index($SourceLine,'PAGES') > -1
    +)) { 
      sub t2hex { 
    ...
      t2hex('huh',$SourceLine); 
    }
                                    }