#!/usr/bin/perl -w
use strict;
$a=3;
print $d;
------------------
Global symbol "$d" requires explicit package name at wrong.pl line 4.
Execution of wrong.pl aborted due to compilation errors.