expectperl-discuss Mailing List for Expect.pm

On Tue, May 24, 2005 at 04:17:38PM -0500, Mic...@sy... wrote:
> All,
> I am have trouble getting the expect command to work
> properly with echoing of a password.  What I have is the following:
> 
>     if (! ($pgsql->expect(60, "Enter new superuser password: ") ) ) {
>         print "****** ERROR: Didn't see superuser password prompt.
> Aborting.\n";
>         exit(1);
>         }
>     print $pgsql "$dbpw\r";
> 
> What happens when I run this is that the password is displayed.  Is there
> any way to take this and make it so the $dbpw (the password variable) is
> not displayed?  Any help would be appreciated.  Thank you.
>            Mike Gantz
>  
> 

	It is either being printed directly by the program or being echoed
back by the terminal. You can try turning echoing off, e.g.
$pgsql->stty('-echo'), or turn log_user off until after you get past the
password.

	Austin

UNSUBSCRIBE


___________________________________________________________________
The information contained in this message and any attachment may be
proprietary, confidential, and privileged or subject to the work
product doctrine and thus protected from disclosure.  If the reader
of this message is not the intended recipient, or an employee or
agent responsible for delivering this message to the intended
recipient, you are hereby notified that any dissemination,
distribution or copying of this communication is strictly prohibited.
If you have received this communication in error, please notify me
immediately by replying to this message and deleting it and all
copies and backups thereof.  Thank you.

Well, this was one of those things where you spend 30 minutes banging
your head and can't understand the problem.  After eating dinner and
coming back to this, I noticed right away that my "use lib" line had an 
incorrect path in it.  Everything's working now.

Thanks!


--- B Mat <bma...@ya...> wrote:

> Hello,
> 
> I do not have permissions to install IO::Tty in the standard install
> area.  Therefore, I install it in my personal area and then "use lib"
> to load the libs from there.  This works fine for 32-bit x86 Linux.
> However, on an Opteron, compile fails with an error like:
> 
> /depot/perl5/bin/perl: relocation error:
>
/home/myinstall/1.0/sw_lib/external/perl/lib/site_perl/5.8.3/x86_64-linux/auto/IO/Tty/Tty.so:
> undefined symbol: Perl_get_sv
> 
> trying to use the 32-bit x86 .so file produces something like:
> 
> Can't load
>
'/home/myinstall/1.0/sw_lib/external/perl/lib/site_perl/5.6.0/i686-linux/auto/IO/Tty/Tty.so'
> for module IO::Tty:
>
/home/myinstall/1.0/sw_lib/external/perl/lib/site_perl/5.6.0/i686-linux/auto/IO/Tty/Tty.so:
> cannot open shared object file: No such file or directory at
> /depot/perl-5.6.0/lib/5.6.0/x86_64-linux/DynaLoader.pm line 200.
> 
> Any insight?
> 
> Thanks!
> 
> 
> 
> 		
> __________________________________ 
> Do you Yahoo!? 
> Yahoo! Small Business - Try our new Resources site
> http://smallbusiness.yahoo.com/resources/
> 
> 
> -------------------------------------------------------
> This SF.Net email is sponsored by Yahoo.
> Introducing Yahoo! Search Developer Network - Create apps using Yahoo!
> Search APIs Find out how you can build Yahoo! directly into your own
> Applications - visit http://developer.yahoo.net/?fr=offad-ysdn-ostg-q22005
> _______________________________________________
> Expectperl-discuss mailing list
> Exp...@li...
> https://lists.sourceforge.net/lists/listinfo/expectperl-discuss
> 



		
__________________________________ 
Yahoo! Mail Mobile 
Take Yahoo! Mail with you! Check email on your mobile phone. 
http://mobile.yahoo.com/learn/mail 

Hello,

I do not have permissions to install IO::Tty in the standard install
area.  Therefore, I install it in my personal area and then "use lib"
to load the libs from there.  This works fine for 32-bit x86 Linux.
However, on an Opteron, compile fails with an error like:

/depot/perl5/bin/perl: relocation error:
/home/myinstall/1.0/sw_lib/external/perl/lib/site_perl/5.8.3/x86_64-linux/auto/IO/Tty/Tty.so:
undefined symbol: Perl_get_sv

trying to use the 32-bit x86 .so file produces something like:

Can't load
'/home/myinstall/1.0/sw_lib/external/perl/lib/site_perl/5.6.0/i686-linux/auto/IO/Tty/Tty.so'
for module IO::Tty:
/home/myinstall/1.0/sw_lib/external/perl/lib/site_perl/5.6.0/i686-linux/auto/IO/Tty/Tty.so:
cannot open shared object file: No such file or directory at
/depot/perl-5.6.0/lib/5.6.0/x86_64-linux/DynaLoader.pm line 200.

Any insight?

Thanks!



		
__________________________________ 
Do you Yahoo!? 
Yahoo! Small Business - Try our new Resources site
http://smallbusiness.yahoo.com/resources/

All,
I am have trouble getting the expect command to work
properly with echoing of a password.  What I have is the following:

    if (! ($pgsql->expect(60, "Enter new superuser password: ") ) ) {
        print "****** ERROR: Didn't see superuser password prompt.
Aborting.\n";
        exit(1);
        }
    print $pgsql "$dbpw\r";

What happens when I run this is that the password is displayed.  Is =
there
any way to take this and make it so the $dbpw (the password variable) is
not displayed?  Any help would be appreciated.  Thank you.
           Mike Gantz
=20