#!/usr/bin/perl

use strict;

my $line;
while ($line = <STDIN>)
{
	chomp ($line);
	my $reversed = reverse $line;
	print $reversed;
	print "\n";
}

