sub sudo {
    my ($label, $ssh, @cmd) = @_;
        foreach my $c (@cmd) {
	    $ssh->system( {stdin_data => "$sudo_passwords{$label}\n"} ,
			  'sudo' , '-Skp' , '' , '--' , split " " , $c );
	    ( $dev_data{$label}= $_ ) if ( $_ !~ /ntpd$/ );
        }
}