Select Code to Download

/^[\w\ \-]+$/

/^[\w\ \-\X]+$/

Unrecognized escape \X in character class passed through in regex; mar
+ked by <-- HERE in m/^[\w\ \-\X <-- HERE ]+$/ at ./b.pl line 10.

/^[\w\ \-(?:\P{M}\p{M}+)]+$/

#!/usr/bin/perl
use strict;
...
                print "BLAH!\n";
        }
}

Summary of my perl5 (revision 5 version 10 subversion 0) configuration
+:
  Platform:
...
    /usr/share/perl/5.10
    /usr/local/lib/site_perl
    .