#!/usr/bin/perl -s -w
sub AUTOLOAD{$_=our$AUTOLOAD,s,^.*::,,,s,_, ,,print}END{print chr 44}
h(l_(P(a(u(J()),_(st())),o(n()),h(t()),_(er())),er())),c(a()),er(k())