Select Code to Download

#!/usr/local/bin/perl 
 
my $dir_split = '/opt/stats/data/split'; 
...
  chdir($dir); 
  unlink @files or die $!; 
}