First pass.

golf tip - when sorting by small non-negative numbers, don't sort :)

#!/usr/bin/perl

# http://perlmonks.org/?node_id=1131533

@ARGV=qw(mig main_generator migrations django_migrations
  django_admin_log myfoo\bar.txt );

#        1         2         3         4         5         6         7
+         8
#234567890123456789012345678901234567890123456789012345678901234567890
+1234567890
#-- count from here
$p?/$p/&&($a["@+"+9*length$&].=$_.$/):($p=s/\B/.*?/gr)for@ARGV;print@a
[download]