Meinst Du den folgenden Abschnitt, habe nun use vars verwendet, zaehlt aber immer noch nicht hoch?:

Verwenden Sie echte globale Variablen, statt lexikalisch globale Variablen. Damit sie von use strict; akzeptiert werden, sollten Sie diese globalen Variablen mit use vars deklarieren:

#!/usr/local/bin/perl -w
use strict;
use vars qw($realglobal); # Echte globale Variable
$realglobal = param("myname");