#!/usr/bin/perl -w

use strict;

my $aloha = "hello";
my $adios = "goodbye";

print reverse($aloha, $adios);