open (DATASET_RANDOM_INTEGER, '<DATASET_RANDOM_INTEGER.dat');
@numbers = <DATASET_RANDOM_INTEGER>;
close (DATASET_RANDOM_INTEGER);

#MEASURE THE TIME DURING WHICH THE ALGORITHM IS PERFORMED
#START
$start = Benchmark->new;

#RUN THE ALGORITHM
@sorted_numbers = sort { $a <=> $b } @numbers;

#FINISH
$end = Benchmark->new;
$diff = timediff( $end, $start );