#!/usr/bin/perl
print+(<>)[-10..-1]