http://qs321.pair.com?node_id=332372


in reply to Ternary confusion

Greetings Nik,

$db =
Whatever we end up returning, save it into a scalar.

($ENV{'SERVER_NAME'} ne "50free.net")
A conditional that evaluates whether the enviornment variable SERVER_NAME is not equal to "50free.net"

? DBI->connect("DBI:mysql:nikos_db", "root", "")
If the conditional is true, then connect to a database on the localhost as root with no password. (Root with no password. Wow, that's dumb.)

: DBI->connect("DBI:mysql:nikos_db:50free.net","nikos_db","macgyver")
If the conditional is false, then connect to a database on a remote box called "50free.net" with a username and password combo.

or print font({-size=>5, -color=>'Lime'}, $DBI::errstr) and exit 0
If the db connection doesn't return true, then print an error message and exit the program.

gryphon
code('Perl') || die;