View Single Post
  #1  
Old 03-11-2012, 04:27 PM
provocating's Avatar
provocating
Demi-God
 
Join Date: Nov 2007
Posts: 2,175
Default Perl require config

I am doing some Perl scripts that are requiring me to have MySQL access, obviously I do not want my login and password information in these scripts. I would rather have them outside of the script. Is there something in the emulator that would interfere with this ? Using a perl require seems to work fine outside of the emulator, I can print out variable results at the command line. Within the emulator the variables do not seem to import properly.

Something simple like

config.pl
Code:
use DBI;
$db_database='peq';
and script.pl

Code:
#!/usr/bin/perl

require 'config.pl';

sub EVENT_SAY
{
  if($text=~/Hail/i) {
    quest::shout('db name ' . $db_database);
  }
}
I would think that would work, now if I do a print after the require line, like print $db_database, it works all day long.
Reply With Quote