in reply to Sorting colon-delimited records

TIMTOWTDI via DBD::CSV: 
use DBI;
use Data::Dumper;

use strict;

my $dir  = '.';
my $file = 'simple_csv';
my $cols = [qw(one two three)];

my $dbh = DBI->connect(
   "DBI:CSV:f_dir=$dir;csv_eol=\n;csv_sep_char=:;",
   {RaiseError=>1},
);

$dbh->{csv_tables}->{$file} = { col_names => $cols };

my $sth = $dbh->selectall_arrayref("
   select one, two, three
   from simple_csv
   order by two
");

print Dumper $sth;

[download]
This assumes that you are in the same directory as the CSV file and the CSV file is named 'simple_csv' - note there is no extension in the file name. Read the docs for more info. Here is the sample CSV file i used:

simple_csv 

three:place3:baz
two:place2:bar
four:place4:qux
one:place1:foo

jeffa

L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)

In Section Seekers of Perl Wisdom