Select Code to Download

$ perl -MText::CSV_XS=csv -wE'csv(in=>[sort{$a->[1]cmp$b->[1]}@{csv(in
+=>"test.csv")}])'
7,"Ace hardware","Ace hardware1"
...
11,car 54 where are you,car 54 where are you1
12,navy blue,navy blue1
13,navy gold,navy gold1

$ cat test.pl
#!/pro/bin/perl
...
11,car 54 where are you,car 54 where are you1
12,navy blue,navy blue1
13,navy gold,navy gold1