#!/usr/local/bin/perl -w `sqlplus_script $argv[0]`