#!/usr/bin/perl -w

use strict;

my $aloha = "hello";
print scalar(reverse($aloha));