Hi O && List !
On Wednesday 06 March 2002 11:41 am, you wrote:
> I'm very new to Perl and have a basic question. How can I convert special
> characters contained in a string to hexadesimal numbers.
sub HTMLify {
my $what = shift;
$what =~ s/(\W)/sprintf("%%%x", ord($1))/eg;
return $what;
}
HTH,
Jan
--
cat /dev/world | perl -e "while (<>) {(/(^.*? \?) 42 \!/) && (print $1)}"
errors->(c)
_
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
