http://qs321.pair.com?node_id=113840


in reply to How do I convert each character in a string to its ASCII value ?

Hi!
#!/usr/bin/perl -w use strict; my $String="This is Ascii"; $String=~s/(.)/ord($1)/eg; print "Ascii: $String\n";

p.s. Might not be the best answer offered here, but it answers your question to the fullest ;)

GreetZ!,

print "profeth still\n" if /bird|devil/;