perl -MData::Dump -e "dd split /./, $ARGV[0]" assasas () #### perl -MData::Dump -e "dd split /\.|:/, $ARGV[0]" 10:A.11:B.12 (10, "A", 11, "B", 12)