#!/usr/bin/perl print $ENV{"HOME"}."\n";