# Read a text file and print it out
while (<$filename>) {
   print;
}