Help for this page
#! /usr/bin/perl -w use strict; ... } @line_numbers = sort {$a <=> $b} @line_numbers; print "$last_n_gram: @line_numbers\n";