perldoc to read

`perldoc perlre` perldata, perlvar, perlfunc, perlsub, and perlref too

File::path - removing all files and directories keeping the root directory in place

keep_root => $bool

When set to a true value, will cause all files and subdirectories to
be removed, except the initially specified directories. This comes in
handy when cleaning out an application's scratch directory.

remove_tree( '/tmp', {keep_root => 1} );

removing duplicate files in a array

use List::MoreUtils qw(uniq);

my @dup_list = qw(1 1 1 2 3 4 4);

my @uniq_list = uniq(@dups);

Other Articles

Enter your email address: