Platon Technologies
not logged in Login Registration
EnglishSlovak
open source software development celebrating 10 years of open source development! Wednesday, October 14, 2026
[BACK] [TXT][DIR] Up to [Platon] / scripts / perl / oracle

Diff for scripts/perl/oracle/oracledump.pl between version 1.2 and 1.3

version 1.2, 2004/01/22 20:38:13 version 1.3, 2004/01/22 20:40:06
Line 1 
Line 1 
 #!/usr/bin/perl  #!/usr/bin/perl
   
 # $Platon: $  # $Platon: scripts/perl/oracledump/oracledump,v 1.2 2004/01/22 20:38:13 nepto Exp $
   
 use strict;  use strict;
   
Line 222  if (! defined $opt_user)
Line 222  if (! defined $opt_user)
   
 if (! defined $opt_password || $opt_password eq "")  if (! defined $opt_password || $opt_password eq "")
 {  {
     print "Username: $opt_user\n";      print STDERR "Username: $opt_user\n";
     ReadMode 'noecho';      ReadMode 'noecho';
     print "Password: ";      print STDERR "Password: ";
     chop($opt_password = <STDIN>);      chop($opt_password = <STDIN>);
     print "\n";      print STDERR "\n";
     ReadMode 'restore';      ReadMode 'restore';
 }  }
   
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
Platon Group <platon@platon.org> http://platon.org/
Copyright © 2002-2006 Platon Group
Site powered by Metafox CMS 		Go to Top