Well that smells like homework but what you've got so far is close to fine. Try $array[0]=['file.ext',37] which is a single record in array @array or if the filenames are unique try $hash{file.ext}=37 which is a single record in the hashed array %hash; Sorting the first is as easy as:

@sorted = sort {$a[1] <=> $b[1]} @array;
# use {$b[1] <=> $a[1]} for a reversed sort
# or {$a[0] cmp $b[0]} to sort by filenames
[download]

Sorting the hash is a little trickier but look around on the site for Schwartzian Transform. =)

--
$you = new YOU;
honk() if $you->love(perl)