Re: regex: only want [a-zA-Z] and comma chars in a string

in reply to regex: only want [a-zA-Z] and comma chars in a string

Why not try without regex?

print "yes" if not tr/a-zA-Z,//c and not ( str( $_, ',', 0) or str $_,
+ ',' ,-1);
[download]

Did not check it but should work.

Cheers,

Jeroen "We are not alone"(FZ)

After some self-flaggalation:

for (qw/ ,asd asd:asd asd, asd,asd asd,,asd/){
 my $test = $_;
 print "$test: ";
 print "yes" unless $test=~tr/a-zA-Z,//c or index( $test, ',') == 0 or
+ index( $test, ',') == -1 + length( $test) or index( $test, ',,') > 0
+;
 print "\n";
 }
[download]

My perl clearly is rusty, and I even don't know anymore in which language str is valid ;).

However, still possible without regexes {grin}.

Comment on Re: regex: only want [a-zA-Z] and comma chars in a string Select or Download Code

Replies are listed 'Best First'.
Re: Re: regex: only want [a-zA-Z] and comma chars in a string by Anonymous Monk on Oct 12, 2003 at 17:42 UTC
bzzt! Why post guesses when 10 seconds would have allowed you to check? The strings are not allowed to have consecutive commas, and `str($_,',',0)` isn't even a valid Perl function.	[reply] [d/l]

In Section Seekers of Perl Wisdom