[ create a new paste ] login | about

Link: http://codepad.org/CQoALx2G    [ raw code | output | fork ]

skeletonkey - Perl, pasted on Feb 18:
1
2
3
my $s = ',-_one,two-three_four';
my @parts = split(/[,\-_]/, $s);
print join("\n", @parts) . "\n";


Output:
1
2
3
4
5
6
7



one
two
three
four


Create a new paste based on this one


Comments: