====== Perl Tips ======

** Finding out the type of a variable in Perl **
<code>
if(ref $variable eq 'HASH') { ... }
You can use "HASH', 'ARRAY', 'SCALAR' etc.
</code>

** How do I touch a file in Perl? **
<code>
my $l_now = time();
utime($l_now, $l_now, "VersionNo.rc");
</code>

** How do I use HTTP proxy applications like PPM? **
<code>
set HTTP_proxy=http://10.1.15.33:8080/
ppm
</code>