Select Code to Download

sub test_sub {
  my ($thischan, $thisuser, $thismsg) = (@_); 
...
  use Data::Dumper; print Dumper \$result;
  carp "cycling";
}

: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