if ( $value =~ m/^([A-Za-z0-9!#\$%&'*+-.^_`|~]+) \s* : \s* (.*)$/x ) {
Note also that in the
[A-Za-z0-9!#\$%&'*+-.^_`|~]
character class, the sub-pattern +-. represents | matches
the range of characters + , - . which includes the - (hyphen) character.
This seems a bit sus; I wonder if it was intended by the OPer.
Give a man a fish: <%-{-{-{-<
In reply to Re: A podcatcher in Perl
by AnomalousMonk
in thread A podcatcher in Perl
by jimhenry
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |