-
- unless (my $return = do "${page}.pl"){
- $error .= "<p><b>couldn't parse $page: $@</b></p>" if $@;
- $error .= "<p><b>couldn't do $page: $!</b></p>" unless defined $return;
- $error .= "<p><b>couldn't run $page</b></p>" unless $return;
+ unless (my $return = do "$ND::PAGE.pl"){
+ $error .= "<p><b>couldn't parse $ND::PAGE: $@</b></p>" if $@;
+ $error .= "<p><b>couldn't do $ND::PAGE: $!</b></p>" unless defined $return && defined $!;
+ $error .= "<p><b>couldn't run $ND::PAGE</b></p>" unless $return;