[ create a new paste ] login | about

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

slevy1ster - Perl, pasted on Nov 8:
1
2
3
4
5
6
$string = "1,2,3\n,4,5,6\n7,8,9";
@array = split(/\n/,$string);
foreach( @array ) {
   $_ =~ s/,//g;
   print $_,"\n";
}


Output:
1
2
3
123
456
789


Create a new paste based on this one


Comments: