Language Basics Perl

use strict 'vars';
if ($^H && 1024 ) {print "You're using use strict 'vars'\n"};