Help for this page

Select Code to Download

Select or download this

    if ( $line =~ /ObjectType1/ ) {
        $context = "ObjectType1" ;
...
    if ( $line =~ /\}/ ) {
        $context = "" ;
    }