#!/usr/bin/perl
use strict;
use warnings;

my $pet = 'dog';
my $pet = 'cat';
my $pet = 'ferret';