From 6cafcc123489aee536621ead3e604696a767faf6 Mon Sep 17 00:00:00 2001 From: Mariano Alvira Date: Mon, 18 May 2009 17:57:21 -0400 Subject: [PATCH] check if $count is defined. --- mc1322x-load.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mc1322x-load.pl b/mc1322x-load.pl index f1b98838a..f545ad89d 100755 --- a/mc1322x-load.pl +++ b/mc1322x-load.pl @@ -115,7 +115,7 @@ if(scalar(@ARGV)!=0) { my $c; my $count; while(1) { ($count, $c) = $ob->read(1); - print $c if ($count != 0); + print $c if (defined($count) && ($count != 0)); } $ob -> close or die "Close failed: $!\n";