my $return_value = `rsh ...`; # your command my @a = split /\s+/, $return_value; print "Content-type: text/html\n\n\n"; foreach (@a) { print "\n" } print "

\n";