#!/usr/bin/perl
require strict;    # require is too late

$var = 1;          #  strictures are not in effect