sockets - TOR Control Protocol from Perl -

i trying make signal newnym call via tor control protocol bound internal port. testing trying without auth field @ moment.

in telnet, if call authenticate authenticated , can proceed signal calls.

in perl using both io::socket, , socket send methods end error:

551 invalid quoted string. need put password in double quotes.

a sample call using in io::socket approximately this:

print "sig-tor:connecting...";  $torsock = new io::socket::inet(     peeraddr => $torcont,     peerport => $torconp,     proto    => 'tcp' ); $torsock or die "no socket :$!";  print "ok!\n";  print "sig-tor:authenticating...";  print $torsock $torauth;  while (<$torsock>) {     print $_; }  print "ok!\n"; sleep(1); 

from

551 invalid quoted string. need put password in double quotes.

i infer need for

print $torsock '"', $torauth, '"'; 

but need certain in $torauth.