#!/usr/bin/perl -w
use strict;
BEGIN {
    if(  @ARGV  &&  $ARGV[0] eq "-debugging"  ) {
        shift @ARGV;
    } else {
        $ENV{PERLDB_OPTS}= 'TTY=/dev/pty06';
        chdir('/home/tye/cgibin')
          or die "Can't chdir to /home/tye/cgibin: $!\n";
        exec( $^X, "-d", $0, "-debugging", @ARGV );
    }
}