#!/usr/bin/perl -w
use strict;

my $filename = "/root/estimates.foo.com"; # declare filename

open FILE, $filename or die "Can't open file: $!/n";
@data=<FILE>;
close FILE;