Select Code to Download

#!/usr/bin/perl

...
$line= <STDIN>;
}
print("Total number of works is $wordcount \n");

The word 
and
...
The word 
and
occurred in Line 1 as the 11th word