Help for this page
my $number = `ls -l $name | wc -l | sed 's/^ *//'';
my $number = `ls -l $name | wc -l | sed 's/^ *//'`;