$a = "OPSms -N op01Sms1 -t SMS -T 0x70000000 -U op01/op011 -I sms1"; %a = split( " ", "-first " . $a); print "$a{-first} $a{-N} $a{-T}\n"; Output: OPSms op01Sms1 0x70000000