#!/usr/bin/perl

use strict;

OPEN "filename"/n";
COUNT ||||||  #this counts spaces over in the list
SORT /R       #this sorts my data