$_ = 'Nothing up my() sleeve';

    s 1.*11||11*.1;

    s||$&Just$"||s||$&Another$"||s||$&Perl$"||s||$&Hacker$/||g;

    print;