#!/usr/bin/perl
use strict;
use warnings;
local $/;
my $in = <STDIN>;
print {*STDOUT} scalar reverse $in;