Select Code to Download

@array = ("/media/banana.jpg","/media/Apple/apple.jpg");

@array = sort mysort @sort;

...
    lc($a) cmp lc($b);
}