use Tie::File;

my $file = '/path/to/file.txt';

tie my @lines,'Tie::File',$file or die $!;
@lines = make_unique(@lines);
untie @lines;
# that's it...