public
Description: Web Application component for Open Australia (perllib module)
Homepage: http://openaustralia.org/
Clone URL: git://github.com/mlandauer/perllib.git
matthew (author)
Fri Jan 18 07:37:00 -0800 2008
commit  ed6e800bbdcacbee41ae04b0bd1c8e57fea6e9ae
tree    df0a234f98b433c26059115701fdc32609c48c55
parent  b9781532381212295dfee5a8820cdefa69400830
perllib / test.pl
100755 19 lines (12 sloc) 0.505 kb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#!/usr/bin/perl -w -I../perllib
 
# test.pl
# Script for quick hacky testing of Perl stuff
#
# Copyright (c) 2004 UK Citizens Online Democracy. All rights reserved.
# Email: francis@mysociety.org; WWW: http://www.mysociety.org/
#
# $Id: test.pl,v 1.1 2004/11/10 09:50:39 francis Exp $
 
use mySociety::Config;
 
mySociety::Config::set_file("/home/francis/devel/mysociety/fyr/conf/general");
 
print mySociety::Config::get("OPTION_DADEM_URL") . "\n";
print mySociety::Config::get("OPTION_MAPIT_URL") . "\n";