c:\@Work\Perl\monks>perl -wMstrict -le "$_ = 'x=x,?x'; print qq{'$_'}; ;; $_= ~/^\w+\s*=\s*\w+\s*\,\?\w+/ ; print qq{'$_'}; ;; $_ = '----'; print qq{'$_'}; ;; $_= ~/^\w+\s*=\s*\w+\s*\,\?\w+/ ; print qq{'$_'}; " 'x=x,?x' '4294967294' '----' '4294967295'