my $wrestlerdir = '/home/ewexpert/public_html/rosterrank';

open(FILE, "$wrestlerdir/wrestlerlist.txt");
    my @lines = <FILE>;
    chomp (@lines = <FILE>);

close(FILE);