Help for this page
$main->width => 2000; $main->height => 1000;
perl -MO=Deparse $main->width => 2000; ... $main->width, '???'; $main->height, '???'; - syntax OK