[+ "Start include incerrobj" +]

[!
{
package testerrobj ;

sub new 

    { 
    return bless { msg => "Error Message from Object"} ;
    }

}

!]

[-
die testerrobj -> new () ;
-]

[+ "End include incerrobj" +]