Select Code to Download

use Sort::Key::Natural qw( natkeysort );

my @sorted =
   natkeysort { tr|\\/|\0|r }
      @paths;