sybperl-l Archive

From: "Andrew J Davies" <Andrew dot J dot Davies at aib dot ie>
Subject: Why the brackets ()
Date: Mar 15 1999 4:45PM

Hi
Why, when I remove the () from around the $database variable do I get an
error.
What are the () actually doing. Without  them $database == 1
                    With them ($database) == "a valid database name"


@rows = $dbh->ct_sql("select name from sysdatabases where name like
\"$opt_D\"");

foreach $row (@rows)
{
     ($database) = @$row;                # ????????????
     next if ( $database eq "master" || $database eq "model" || $database
eq "sybsystemprocs" );
     print "$database.\n";
     ...

}


Thanks for your time.
Andy