Help for this page

Select Code to Download


  1. or download this
    @f = <DATA>;
foreach $line (@f) {
...
AA 34
AB 22
AC 12
  2. or download this
    use strict;
use warnings;
...
AA 34
AB 22
AC 12
  3. or download this
    Can't use string ("AA 34
") as an ARRAY ref while "strict refs" in use at mytest.pl line 12, <D
+ATA> line 3 (#1)
...
    Can't use string ("AA 34
") as an ARRAY ref while "strict refs" in use at mytest.pl line 12, <D
+ATA> line 3.
 at mytest.pl line 12, <DATA> line 3.