Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • by grantm (164) on 2008.08.05 7:13 (#64194) Homepage Journal

    I tossed and turned in bed for a while and suddenly the solution was obvious:

    $ perl -le 'use utf8; q{TEST} =~/^[\x{0041}-\x{005A}]+$/ && print q{OK}'
    OK

    How soon we forget!

    • I can't tell you how many times something similar has happened to me. I keep a notepad by the bed when that happens as I know I will popup from sleep with an "Ah ha!".