Would appreciate if any perl users could enlighten me on this one
I never write scripts in perl (actually I hardly ever write scripts in
anything), however I need a small script which telnets to a server and
prints some data, I have another script which does similar and is
written in perl so I though the simplest thing would be a slight mod.
I want to capture the telnet output to a string, so do as follows
$output = $tn->waitfor('/Monitor/i');
The printed output of this is a '1'
However it should not be a '1', it should be a string of data.
But when I print directly, as follows, I get the correct string.
When I check an example (shown below - full here
it's similar to my original - what's my mistake ?
$output = $telnet->waitfor('/\$ $/i');
Maintained by the ILUG website team. The aim of Linux.ie is to
support and help commercial and private users of Linux in Ireland. You can
display ILUG news in your own webpages, read backend
information to find out how. Networking services kindly provided by HEAnet, server kindly donated by
Dell. Linux is a trademark of Linus Torvalds,
used with permission. No penguins were harmed in the production or maintenance
of this highly praised website. Looking for the
Indian Linux Users' Group? Try here. If you've read all this and aren't a lawyer: you should be!