#! perl -slw
use strict;
package fred;
...