Hello,

My code is below:

$aux = `ls /opt`;
@word = split /\s+/, $aux;

my @bancos = ();

foreach my $i (@word)
  {
    if ( -e "/opt/$i/postgresql.conf" )
      {
       push(@bancos,$i);
      }
  }

for ($i = 0; $i < @bancos; $i++)
{
  su postgres -c "/usr/local/pgsql/bin/pg_ctl start -D
@bancos[$i]";
}

After running the script como the error:

Can't locate object method "su" via package "postgres"
(perhaps you forgot to load "postgres"?) at ./teste.pl
line 19.

I don't understad this message ?

Best regards,

Rodrigo Faria Tavares

__________________________________________________
Fale com seus amigos  de graça com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to