Help for this page

Select Code to Download


  1. or download this
    use warnings;
    use strict;
    ...
    # sub hiccup (&@) { return join "\n", map $_[0]->(), @_[ 1 .. $#_ ]; }
    
    print "[[$s]]";
    
  2. or download this
    package Hic;
    
    ...
    sub hiccup (&@) { return join "\n", map $_[0]->(), @_[ 1 .. $#_ ]; }
    
    1;
    
  3. or download this
    c:\@Work\Perl\monks\Anonymous Monk\1197277>perl hiccup_here_3.pl
    [[iptables -t nat -N outbound-DMZ
    ...
    flocculate -f BOFF -j SNAT --to-source SOMEWHERE
    iptables -t nat -A outbound-DMZ -j RETURN
    ]]