Help for this page

Select Code to Download


  1. or download this
    sub test_sub {
      my ($thischan, $thisuser, $thismsg) = (@_); 
    ...
      use Data::Dumper; print Dumper \$result;
      carp "cycling";
    }
    
  2. or download this
    :google bleh # this was my input
    Found Total: 1,110,000
    $VAR1 = \undef;
    cycling at test_harness.pl line 31
            main::test_sub('#bleh', 'alex', ':google bleh') called at test
    +_harness.pl line 17