$ ./1.debug.11.pl
Subroutine debug1::getcwd redefined at /usr/share/perl/5.30/Exporter.pm line 66.
 at template_stuff/debug1.pm line 397.
title is 1.debug.1
path1 is /home/hogan/6.scripts/1.debug.1
abs is /home/hogan/6.scripts/1.debug.1/1.debug.11.pl
Can't use an undefined value as a HASH reference at template_stuff/debug1.pm line 35.
$ pwd
/home/hogan/6.scripts/1.debug.1
$ ls
1.debug.11.pl  1.debug.11.pl.bak  template_stuff
$