File::Spec->rel2abs hanging?

Select or download this

#!/usr/bin/perl 

...

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

Select or download this

bash-2.05b$ perl -v

This is perl, v5.8.2 built for i386-freebsd

Select or download this

 
bash-2.05b$ uname -a
FreeBSD web2.host.ie 4.9-STABLE FreeBSD 4.9-STABLE #0: Fri Feb 27 10:1
+1:56 GMT 2004     root@web2.host.ie:/usr/src/sys/compile/WEB  i386

Select Code to Download