Invalid Reference Use - warning Noob

Select or download this

package AXRecord;

...
    $self->Changed = -1;

}

Select or download this

$self->Fields{$Flds[$i]} = $Values[$i];

Select or download this

C:\Users\Jay\Desktop\SBS DEV\CODE\perl\Utilities>perl -w AXRecord.pm

...
AXRecord.pm has too many errors.

C:\Users\Jay\Desktop\SBS DEV\CODE\perl\Utilities>

Select Code to Download