Select Code to Download

#!/usr/bin/perl -w
use strict;
...
print "$var2\n";
print "$var3\n";
print "$var4\n";

Use of uninitialized value in concatenation (.) or string at ./test2.p
+l line 10.

...
66051
263430

0
0
66051
263430