#!/usr/bin/perl - w

use strict;

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