use warnings; 
                my $count = 0;
                foreach $i ($elt)
                {
                        $execute = system($command . $i);
                        if ( $execute > 0 )
                        {
                              $counter++;
                              chomp($i);
                              printf "%s\n%-45s%s%s%4s%s",color('white'),$elt, color('reset'),color('red'),'[DEAD]',color('reset');
                        }
                        elsif ( $execute == 1 >> 8)
                        {
                               chomp($i);
                               printf "%s\n%-45s%s%s%4s%s",color('white'),$elt, color('reset'),color('green'),'[ Ok ]',color('reset');
                               $count++;
                        }
                }
        }
}
print "$count";