#! /usr/bin/perl print("1234\n");