[LA.pm] alternating...

[David Heayn]

Thank you all for quick responses.

In my script I am using strict, and -w.

The script parses a log file for refer tags. I ran it through the 
debugger and this came out:



-jailshell-2.05b$ perl -d refer.pl > results.html


Loading DB routines from perl5db.pl version 1.28
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(refer.pl:4):     my $fileLoc = "markhe.access_log-06.23.05";
Unable to get Terminal Size. The TIOCGWINSZ ioctl didn't work. The 
COLUMNS and LINES environment variables didn't work. The resize 
program didn't work. at 
/usr/lib/perl5/site_perl/5.8.4/i686-linux/Term/ReadKey.pm line 362.
Compilation failed in require at 
/usr/lib/perl5/site_perl/5.8.4/Term/ReadLine/Perl.pm line 58.
  at /usr/lib/perl5/site_perl/5.8.4/Term/ReadLine/Perl.pm line 58
         Term::ReadLine::Perl::new('Term::ReadLine', 'perldb', 
'GLOB(0x81e4548)', 'GLOB(0x81aa2e0)') called at 
/usr/lib/perl5/5.8.6/perl5db.pl line 6029
         DB::setterm called at /usr/lib/perl5/5.8.6/perl5db.pl line 2203
         DB::DB called at refer.pl line 4
Debugged program terminated.  Use q to quit or R to restart,
   use O inhibit_exit to avoid stopping after program termination,
   h q, h R or h O to get additional info.




The variable at line 4 is something I can't change. The server names 
those and allows me read-only access. I'm thinking the the double "." 
have something to do with it.



David Heayn * http://www.cloudgraphics.com * 213/925.3283