$VAR = TEMP_VAR open (FILE,"<", "file.txt") or die $!; while () { chomp; eval(print "$_\n"); } close (FILE);