perlquestion
oldwarrior32
<p>Hello. I ask for your wisdom again dear monks.</p>
<p> I am trying this:</p>
<code>
my $username = 'john.doe';
$username = quotemeta($username);
($prematch,$match) = $session->waitfor(match => '/$username/',
Timeout => 10);
</code>
<p> But I got this error:</p>
<p>Global symbol "$username" requires explicit package name at (eval 11) line 1, <> l
ine 247.
...propagated at testRegex.pl line 128, <> line 247.
</p>
<p>It looks like the method is interpreting that I'm passing a variable to the regex, and not a string. I really need to pass the variable, but only the string inside the variable is what the method should get.</p>
<p> The waitfor method comes from the Telnet module.</p>
<p> How do I just pass the string and not the variable?</p>
<p> The idea behind this, is that I got a lot of username to test, and all of them uses the format "name.surname".</p>
<p>Thanks!.</p>