Select Code to Download

#! /usr/bin/perl

...
$lexicon->insert_after($insert_this->tokens());

print $doc->serialize();

package My::L10N::en;

use base 'My::L10N';
...
    'Some [_1] text',

);

package My::L10N::en;

use base 'My::L10N';
...
    'The [_1] is in the [_2]' =>
    'The [_1] is in the [_2]',
);

#! /usr/bin/perl

...
}

print $doc->serialize();