>perl -wMstrict -le "my $s = 'foobar'; print reverse $s, 'zot'; print scalar reverse $s, 'zot'; " zotfoobar tozraboof