#!/usr/bin/perl - w

use strict;

my @list = qw (first    second    third    fourth    fifth    sixth    seventh    eigth    ninth    tenth);
my @reverse = reverse (@list);
print "@reverse";