#!/usr/bin/perl -w
 
my $x = shift;
chomp $x;
print reverse( substr( crypt( $x, "ar" ), 2))."\n";