Option 1:
Use File::Slurp $file_contents = read_file($wget_saved_filename);
Option 2:
open (READ_WGET_FILE, "<$data_dir/$wget_saved_filename"); $file_contents = do { local $/; <READ_WGET_FILE> }; close (READ_WGET_FILE);