#!/usr/bin/perl 

use CGI::Carp "fatalsToBrowser"; 
use File::Spec; 
use CGI qw(:standard); 

print header(); 
print File::Spec->rel2abs(__FILE__);