Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Problem with regex passed to a hash

by toolic (Chancellor)
on Oct 02, 2012 at 00:16 UTC ( #996776=note: print w/ replies, xml ) Need Help??


in reply to Problem with regex passed to a hash

Try qr:

($prematch,$match) = $session->waitfor(match => qr/$username/, Timeout => 10);


Comment on Re: Problem with regex passed to a hash
Download Code
Re^2: Problem with regex passed to a hash
by oldwarrior32 (Sexton) on Oct 02, 2012 at 00:54 UTC

    With qr doesn't appears the error, but there is no match(?)

    Gonna study the qr function. Thanks!

      Yeah, Net::Telnet is rather old and uses a weird method of passing regexes as arguments. For a more recent module qr// would be appropriate, but Net::Telnet requires a string that starts and ends with a slash.

      The other posters are right when they say you should double quote. Any method for building strings will work:

      '/'.$username.'/' "/$username/" sprintf('/%s/', $username)
      As an aside, if you're trying to log in, there's a login method in Net::Telnet.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://996776]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (5)
As of 2014-09-02 03:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (19 votes), past polls