################################################################
# com_1 Funktion fuer die Variable an Instanz 1.0
# Rueckgabe : undef bei Erfolg, sonst Fehlercode
################################################################
sub com_1
{
$A1 = $A1_Temp;
return(undef);
}
################################################################
# com_2 Funktion fuer die Variable an Instanz 2.0
# Rueckgabe : undef bei Erfolg, sonst Fehlercode
################################################################
sub com_2
{
$A2 = $A2_Temp;
return(undef);
}
1;# PERL - spez. Eine Dat., die mit require eingeb. wird muss mit True enden.