Help! I need somebody! Help! ...

[Help]

use CGI       ':standard';
use CGI::Carp 'fatalsToBrowser';
use strict;

open NEU, "counter.txt" or die "Kann counter.txt nicht oeffnen: $!";

my $dataa = <NEU>;

$dataa= $dataa + 1;
close(NEU);

open DATEI, ">counter.txt" or die "Kann Datei counter.txt nicht oeffnen: $!";
print DATEI $dataa;
close(DATEI);

my $url = &param('url');
print redirect("../$url");

Hallo!

Was bedeuten die ersten 3 Zeilen? Und warum funktioniert das script nur mit
"my" vor der Variable?

Danke