For readability, s/;/;\n/g. From an error message it seems Slashdot is hostile to small lines in posts. The original is 73 lines.
#!/usr/bin/env perl
use strict;
use Digest::SHA;
use Cwd;
use File::Util;
my $topDir=cwd();
my($f) = File::Util->new();
my(@files) = $f->list_dir($topDir,'--recurse');
my %hash;
my $deleteFlag=$ARGV[0];
#print $deleteFlag,"\n";
foreach my $file(@files) {
if(-d $file) {next;}
my $size=$f->size($file);
push @{$hash{$size}},$file;
}
my ($filectr,$setctr)=(0,0);
foreach my $key (sort { $a $b } keys %hash) {#loop through sizes
my $value=$hash{$key};
my @arr=@{$value};
my $numFiles = @arr;
if ($numFiles $b } keys %shahash) { #loop through files of same hash value
my $shavalue=$shahash{$shakey};
my @shaarr=@{$shavalue};
my $numFilesSha = @shaarr;
if($numFilesSha new($alg);
$sha->addfile($filename);
my $digest = $sha->hexdigest();
return $digest;
}
sub unixFilename {
my ($filename) = @_;
$filename =~ s/\)/\\\)/g;
$filename =~ s/\(/\\\(/g;
$filename =~ s/\
we have an EXTREMELY functional interstate system for local travel
No. The interstate system kills 40K people per year and receives huge hidden subsidies such as military protection of the oil supply line. The cost of driving is a huge burden for the poor.
and for all other domestic travel we have airplanes (very efficient and low cost if tickets are bought in advance.
Airplanes are a hassle because airports are located far from city centers and you can't always predict when you need to leave for a trip.
Don't like fees? Fly southwest).
Limited service areas.
High Speed Rail would have the EXACT same security measures as airplanes,
Preposterous, you can't redirect trains into skyscrapers or foreign countries and they do not fall out of the sky.
as well as the large trucks that are used to transport goods and services.
Large trucks are highly labor inefficient and there is no such thing as transporting services by freight.
But we already have a rail system, and it works just fine.
Sure, if crossing the country in eight days is your idea of "fine", if the trains even go where you need them to (fat chance).
To replace driving you need a public transporation system.
Part of the reason public transit doesn't do well in the US is you still need a car for short and medium intercity trips. Chicken-egg.
To replace planes you need it to be cheaper, safer, and actually faster.
You don't need all three. High-speed trains for medium distances are faster when you consider the overhead of traveling to the airport and getting through security. High-speed trains will be cheaper when peak oil hits, if it hasn't already. Trains, with spacious seating, lounge cars, and dining facilities, are also much more comfortable to travel on than either bus or plane. Finally, you must also consider that many people cannot drive because of disability, age, license revocation, or like myself, piss-poor at driving.
"Engineering without management is art." -- Jeff Johnson