# whoops, syntax errors, thanks to Roy Johnson
## ( eval "$PAGE" if main->can($PAGE) ) or nopageerror;

## or... 
#( eval "$PAGE" if main->can($PAGE) )
#  or nopageerror;

## or...
if ( main->can($PAGE) ) {  eval $PAGE }
else {  nopageerror }