Can you give us an example of what might be in $ARGV[0] and which pieces you want extracted (and into what variables)? There are several things wrong there to start with. You are setting $portnm but matching against $port, you are using . where you probably mean \. (just . matches any character except a newline).