Select Code to Download

package ShownameFilter;
use Filter::Simple;
...
};

1;

use strict;
use warnings;
...
showname( $x12 );
showname( \$x12 );
showname( @foo );

name: x
name: x12
name: x12
name: foo