#!/usr/bin/perl
    # Example with errors
    
    use strict;
    use warnings;
    
    $foo = 3;
    my $bar = 5;
    my $baz = $zoom . "zoom";