% perl -MData::Dumper -nwe 'chomp; 
  ($sub, $rest) = split / +/, $_, 2; 
  eval "$sub($rest)"; print $@ if $@; print "\n) " } 
  BEGIN { sub spew { print Dumper(@_) } print ") "'