Creating Perl example of sending stats to StatsD