System error

error:  Undefined subroutine &HTML::Mason::Commands::InvalidFile called at /var/www/html/htdocs/uwmlsc/secure/bursts/investigations/s4index.html line 109.
context: 
... 
105:  %#####################################################################
106:  % my $path = "/var/www/html/htdocs/uwmlsc/secure/bursts/investigations/s4/onlineanalysis";
107:  % my $indexname = "$path/index.lst";
108:  % my $script = "http://www.lsc-group.phys.uwm.edu/cgi-bin/bag-enote.pl";
109:  % open( IDX, "<$indexname" ) || &InvalidFile();
110:  % flock( IDX, $main::LOCK_EX ) if ( $main::flock );
111:  % seek( IDX, 0, 0 );
112:  %
113:  %# Open the index file and parse it.
... 
code stack:  /var/www/html/htdocs/uwmlsc/secure/bursts/investigations/s4index.html:109
/var/www/html/htdocs/uwmlsc/secure/bursts/investigations/autohandler:5
raw error






























Undefined subroutine &HTML::Mason::Commands::InvalidFile called at /var/www/html/htdocs/uwmlsc/secure/bursts/investigations/s4index.html line 109.


Trace begun at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Exceptions.pm line 129
HTML::Mason::Exceptions::rethrow_exception('Undefined subroutine &HTML::Mason::Commands::InvalidFile called at /var/www/html/htdocs/uwmlsc/secure/bursts/investigations/s4index.html line 109.^J') called at /var/www/html/htdocs/uwmlsc/secure/bursts/investigations/s4index.html line 109
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x2adbb24b4f60)') called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1273
eval {...} at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1268
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 937
HTML::Mason::Request::call_next('HTML::Mason::Request::ApacheHandler=HASH(0x2adbb23086f0)') called at /var/www/html/htdocs/uwmlsc/secure/bursts/investigations/autohandler line 5
HTML::Mason::Commands::__ANON__ at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Component.pm line 135
HTML::Mason::Component::run('HTML::Mason::Component::FileBased=HASH(0x2adbaf50aca0)') called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1273
eval {...} at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 1268
HTML::Mason::Request::comp(undef, undef, undef) called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 467
eval {...} at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 467
eval {...} at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/Request.pm line 419
HTML::Mason::Request::exec('HTML::Mason::Request::ApacheHandler=HASH(0x2adbb23086f0)') called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 168
HTML::Mason::Request::ApacheHandler::exec('HTML::Mason::Request::ApacheHandler=HASH(0x2adbb23086f0)') called at /usr/lib/perl5/vendor_perl/5.8.8/HTML/Mason/ApacheHandler.pm line 825
HTML::Mason::ApacheHandler::handle_request('HTML::Mason::ApacheHandler=HASH(0x2adba3144430)', 'Apache2::RequestRec=SCALAR(0x2adbb142fba0)') called at (eval 200) line 8
HTML::Mason::ApacheHandler::handler('HTML::Mason::ApacheHandler', 'Apache2::RequestRec=SCALAR(0x2adbb142fba0)') called at -e line 0
eval {...} at -e line 0