#!/usr/bin/perl -n
}{printf"%010d\n",$.