$ perl -wE '$_ = "12/13/14"; @x = split "/"; say for @x' 12 13 14 $