Select Code to Download

sub remove_cruft
{
...
  # on second thought, don't do that last one :-)

}

sub remove_cruft
{
...
  $_->($l) foreach (\&remove_cruft, \&remove_other_cruft, \&remove_yet
+_more_cruft);

}