Please advise on the small amount of code b/c I am getting the message as below, but the code is working and output how I want it, just trying to rid of messages.
thank you! Use of uninitialized value in concatenation (.) or string at JFS_version_parser.pl line 20, <JFS> line 952 (#1) Use of uninitialized value in concatenation (.) or string at JFS_version_parser.pl line 21, <JFS> line 952 (#1) Use of uninitialized value in concatenation (.) or string at JFS_version_parser.pl line 21, <JFS> line 956 (#1) Use of uninitialized value in concatenation (.) or string at JFS_version_parser.pl line 22, <JFS> line 956 (#1) use strict; use warnings; use diagnostics; my $jfsFile = qq(/tmp/onlinJFS_4_license_exp.txt); my $CvsFile = qq(/tmp/onlinJFS_4_license_exp.cvs); my $regexp = qr/(host:\w+)|(onlinejfs.*)|(jfs\sversion.*)/is; my ($host,$swlist,$kernel) = 0; open (JFS, "+<$jfsFile") or die "file '$jfsFile' was not opened $!"; while (<JFS>) { s/^\s+|\s+$//g; next if ! length $_; if (/$regexp/) { ($host,$swlist,$kernel) = ($1, $2, $3); print "\n$1"; print "\t$2"; print "$3\n"; } } __DATA__ --------------------------- HOST:axyz --------------------------- You have mail. logout # OnlineJFS B.11.11 Online features of the VxFS File System OnlineJFS.VXFS-ADV-RUN B.11.11 VXFS-ADV-RUN # PHCO_25831 1.0 SCSI Ultra160 driver Online Addition script SW-DIST.SD-JPN-E-HELP B.11.11.0212 Japanese EUC Online Help for SD SW-DIST.SD-JPN-S-HELP B.11.11.0212 Japanese SJIS Online Help for SD X11.X11-RUN-CL-MAN B.11.11 Online manual pages for X11 clients X11.X11-RUN-CT-MAN B.11.11 Online manual pages for X11 contrib clients X11.X11-RUN-MAN B.11.11 Online manual pages for X11 clients OnlineDiag B.11.11.09.11 HPUX 11.11 Support Tools Bundle, Dec 2002 JFS version loaded in Kernel: $Revision: libvxfs.a: CUPI80_BL2000_1108_2 Wed Nov 8 10:59:22 PST 2000 $ Connection to closed. --------------------------- HOST:xyxxx --------------------------- __DesiredOutput__ HOST:xyzzz OnlineJFS B.11.11 Online features of the VxFS File System OnlineJFS.VXFS-ADV-RUN B.11.11 VXFS-ADV-RUN JFS version loaded in Kernel: $Revision: libvxfs.a: CUPI80_BL2000_1108_2 Wed Nov 8 10:59:22 PST 20 00 $ __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/