#!/usr/bin/perl my $output = `ssh bash -s` < EOF