regexperlalternation

Perl alternation match behaves differently with parentheses


Can someone explain why my match behaves differently whether or not the alternation is enclosed within a capture group?

Is this possibly due to the old version of Perl (which I have no control over, sadly), or am I misunderstanding something? My understanding was that the parentheses were a convention for some people but otherwise unnecessary in this case.

[~]$ perl -v

This is perl, v5.6.1 built for PA-RISC1.1-thread-multi
(with 1 registered patch, see perl -V for more detail)

Copyright 1987-2001, Larry Wall

Binary build 633 provided by ActiveState Corp. http://www.ActiveState.com
Built 12:17:09 Jun 24 2002


Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using `man perl' or `perldoc perl'.  If you have access to the
Internet, point your browser at http://www.perl.com/, the Perl Home Page.

[~]$ perl -e 'print "match\n" if ("getnew" =~ /^get|put|remove$/);'
match
[~]$ perl -e 'print "match\n" if ("getnew" =~ /^(get|put|remove)$/);'
[~]$

Solution

  • ^get|put|remove$ finds ^get or put or remove$. So, "getnew" matches the pattern because it starts with get.

    Whereas ^(get|put|remove)$ finds ^get$ or ^put$ or ^remove$.