note
haukex
<p>Or just use escapes, or if it's about passing something from the shell to Perl, the <c>-s</c> option...</p>
<c>
$ perl -sle 'print qq{\047\x27$x}' -- -x="'"
'''
$ FOO='`´()/~?*+#"@$%&'"'"; perl -sle 'print $x' -- -x="$FOO"
`´()/~?*+#"@$%&'
</c>
1226880
1227248