in reply to Module for making english lists?
I dunno, try this just for fun
#!/usr/bin/perl @str = ("a,b,c,d,e", "a", "a,b", "a,b,c"); foreach $x (@str){ $x =~ s/\,(\w+)$/ and $1/; print "$x\n"; }
Enjoy!
Dageek
|
---|
In Section
Seekers of Perl Wisdom