I've always thought that the first position was for the closing square bracket, and the hyphen should be placed at the end of the character class. From perlretut: If ’-’ is the first or last character in a character class, it is treated as an ordinary character; "[-ab]","[ab-]" and "[a\-b]" are all equivalent. It's interesting to note that the same doesn't apply to the closing square bracket:

$ perl -e 'my $s="-]"; print "a\n" if $s =~ /[___]]/'
$ perl -e 'my $s="-]"; print "a\n" if $s =~ /[]___]/'
a
$ perl -e 'my $s="-]"; print "a\n" if $s =~ /[___-]/'
a
$ perl -e 'my $s="-]"; print "a\n" if $s =~ /[-___]/'
a
[download]

Update: In Perl, ']' has to be escaped so the first and seconds examples above are wrong. It is in grep, where it suffices to put the bracket at the beginning of the character class.

David, you were correct the first time and your second example is fine. ] can be the first character in a class without being escaped.



H:\>perl -e "$_='a';/[]a]/?print 'Y':print 'N'"
Y
H:\>
[download]

On an XP box (which is why you see the reversed quote notation). I also believe you're absolutely correct about the hyphen being acceptable as the last character (it's not "underscore to nothing").


-----------------
_{s''limp';@p=split '!','n!h!p!';s,m,s,;$s=y;$c=slice @p1;so brutally;d;$n=reverse;$c=$s**$#p;print(''.$c^chop($n))while($c/=$#p)>=1;}

I thought it had to be first but obviously I was wrong. Apologies to wannabeperlie. Thank you for the correction. Another new thing learnt.

Cheers,

JohnGG