... my $MISC_FILE_DIR = shift || die usage(); my $req = shift || die usage(); my $inqfile = shift || die usage(); my $sent = shift || die usage(); my $status = shift || die "please specify status\n" . usage(); ... #### bash-2.03$ insertIntoLN.pl misc 135 doesnt_matter 20031208120000 0 please specify status usage: ./insertIntoLN.pl #### ... while( my @row = $sth->fetchrow_array ) { print join( '|', map ( $_ || 'NULL', @row )) ."\n"; } ... #### 137|src/20031208153031.txt|20031210093234|NULL|NULL 138|src/20031208153031.txt|20031210093509|NULL|NULL