use MightyMod; use XML::Simple; my $y = BadSub(0); my $z = GoodSub(0); print "$y $z";