#!/usr/bin/perl -w

use strict;

my $string = 'ABCDEFGFEDCBA';

print "$string\n" and $string =~ s/$_/ /g for reverse 'A' .. 'G';
[download]

PerlMonks lovingly hand-crafted by Tim Vroom.
PerlMonks is a proud member of the The Perl Foundation.
Speedy Servers and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.