package Test;
require Exporter;
@ISA = (Exporter);
sub AddValue
{
     $_[0]->[2] = "myvalue";
}