#!/usr/local/bin/perl
print do { 6105*30 }