my $number_of_clusters = abs(shift @ARGV);