You should always post the code you are running. What you posted doesn't compile.

With the previous suggestion, here is a simplified version of your code:

use warnings;
use strict;

my $file = 'filename.txt';
open my $fh, '<', $file or die "cant open : $!";
my @comp = sort <$fh>;
close $fh;
print "@comp";
[download]