Select Code to Download

#!perl
use strict;
...
my @confs = split /, /,$confs;
my @sortedconfs = sort {$a cmp $b} @confs;
print "@sortedconfs\n";