Select Code to Download

use Wx;
use Wx::XRC;
...

my($app) = MyApp->new();
$app->MainLoop();

# notebook1.xrc
<?xml version="1.0" encoding="UTF-8"?>
...
</resource>