#!/usr/bin/perl # # $Id$ # # Configuration converter # Converts from old-style (Pre-2.3) configuration files to new format found in PMA-2.3 # # Takes input from STDIN, sends output to STDOUT # # By Robin Johnson robbat2@users.sourceforge.net # Many thanks to Patrick Lougheed pat@tfsb.org # while(<>) { s/\$cfg(\w+)/\$cfg\[\'$1\'\]/g; print; }