#!/usr/bin/perl
# ARG : none
# timezone via stdout

exit 1 unless (-f "/etc/timezone");
my $timezone = `cat /etc/timezone`;
chomp $timezone;
print $timezone;
exit 0;
