$|=1; # So it works in the Open Perl IDE

@words = qw /I am learning Perl/;
foreach $e (@words){
  print "$e\n";  # Wow! Thats short!
}


