[ create a new paste ] login | about

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

Perl, pasted on Jun 26:
1
2
3
4
5
$src="A/B/C/D/E";
$src =~ s|/|」「|g;
$src =~ s/^([^」]*)」/【$1】/;
$src =~ s/「([^「]*)$/【$1】/;
print $src;


Output:
1
【A】「B」「C」「D」【E】


Create a new paste based on this one


Comments: