#!/usr/bin/perl
my $x = "One";

$x = "Two";

my $y = "Lambda";

$x = "Four";