- or download this
#!/usr/bin/perl -w
...
print "My number is $string\n";
}
- or download this
Found = in conditional, should be == at ./testsub.pl line 22.
Found = in conditional, should be == at ./testsub.pl line 19.
...
My number is one
My number is one
My number is one
- or download this
Use of uninitialized value in numeric eq (==) at ./testsub.pl line 16.
Use of uninitialized value in numeric eq (==) at ./testsub.pl line 16.
...
Use of uninitialized value in numeric eq (==) at ./testsub.pl line 16.
Use of uninitialized value in numeric eq (==) at ./testsub.pl line 16.
My number is four