chomp (my @hosts = `cat /.root/sample.txt`);

my $pssh = Net::OpenSSH::Parallel->new();

$pssh->add_host($_, user=> $user_name,
                master_stderr_discard =>1,
                master_opts => [-o => "StrictHostKeyChecking no" ]) for @hosts;

$pssh->push('*', command => 'egrep "^dba|^sea|^adm|^mwa|^ae" /etc/passwd');
$pssh->run;