/home/.sites/site39/wwwroot/web/top.cgi
Can't locate File/Sort.pm in @INC (you may need to install the File::Sort module) (@INC contains: /usr/local/lib64/perl5 /usr/local/share/perl5 /usr/lib64/perl5/vendor_perl /usr/share/perl5/vendor_perl /usr/lib64/perl5 /usr/share/perl5) at /home/.sites/site39/wwwroot/web/top.cgi line 277.
- /home/.sites/site39/wwwroot/web/top.cgi LINE : 277.
| 274: | elsif ($lockkey == 2) { &lock2; }
|
| 275: |
|
| 276: | #番号順にソート
|
| 277: | use File::Sort qw(sort_file);
|
| 278: | sort_file({r =>1,n =>1,t => "<>", k => 1,I => "./log/navi.log", o => "./log/navi.log"});
|
| 279: |
|
| 280: | open(IN,"$logfile") || &error("Can't open $logfile","lock");
|
- /home/.sites/site39/wwwroot/web/top.cgi LINE : 277.
| 274: | elsif ($lockkey == 2) { &lock2; }
|
| 275: |
|
| 276: | #番号順にソート
|
| 277: | use File::Sort qw(sort_file);
|
| 278: | sort_file({r =>1,n =>1,t => "<>", k => 1,I => "./log/navi.log", o => "./log/navi.log"});
|
| 279: |
|
| 280: | open(IN,"$logfile") || &error("Can't open $logfile","lock");
|