Select Code to Download

use strict;
my $s=n_sub ("Toy boats are for the little boys" ,2,"b","g");
...
    $el[-1] =~ s/$ic/$oc/g;
    return join ($ic, @el);
}