my $x = 'Just Another';
my $y := $x;
$y = 'Perl Hacker';
say $x;
say $y;