Select Code to Download

package thing;
...
this    $
that    @
}});

package morething;
...
another $
yetmore @
}});

use thing;
...

$mt = morething->new;
$mt->this('issomething');

Modification of a read-only value attempted at (eval 7) line 48.