print "$retVal\n";
print "Success!\n" if $retVal=~s/showpos=1/showpos=$main::pageVar1/;
print "$retVal\n";
print "$main::pageVar\n";