#!/usr/bin/perl

open( file , $ARGV[0] );
@tab =  <file>;
close file;
@out  = sort @tab;
print @out;

