if ( -e ! "$Self->{Home}/RELEASE" ) 
{
           print STDERR "Error : Fehler bei der Initialisierung des Release - Files ( $Self->{Home}/RELEASE ) !" , "\n";
           die;
}
	
if ( open( my $Product, '<', "$Self->{Home}/RELEASE" ) ) 
{ 
   while ( my $Line = <$Product> ) 
   {
      if ( $Line !~ /^#/ ) 
      {
         if ( $Line =~ /^PRODUCT\s{0,2}=\s{0,2}(.*)\s{0,2}$/i ) 
	 {
            $Self -> { Product } = $1;
         }
                
         elsif ( $Line =~ /^VERSION\s{0,2}=\s{0,2}(.*)\s{0,2}$/i ) 
	 {
            $Self -> { Version } = $1;
         }
       }
    }
		
    close( $Product );
    
} else { print STDERR "Fehler bei der Verarbeitung des Release - Files ( Keine Berechtigung auf Datei $Self->{Home}/RELEASE ) !.\n";
         die;
       }