#!/usr/bin/perl -T
#
# Allows you to debug a script by starting the
# interactive GUI debugger on your X screen.
#
use strict;
use warnings;

$ENV{DISPLAY} = ":0.0"; # Set the name of the display
$ENV{PATH}="/bin:/usr/bin:/usr/X11R6/bin:";

system("/usr/bin/perl -T -d:ptkdb hello.pl");