package Lingua::Perl::Espanol;
use Filter::Simple
    FILTER_ONLY code_no_comments => sub {
        s/push/empuja/g;
        s/use/usa/g;
#...
    };
1;

##</code><code>##

use Lingua::Perl::Espanol qw(no_list_ops no_flow);