Curly braces should do the trick here, to separate your variable name from the '1': print "Success!\n" if $retVal =~ s/showpos=1/showpos=${main::pageVar}1/;