Select Code to Download

my_mingscript > japh.swf

...
</center>
</body >
</html>

#!/usr/bin/perl
use strict;
...
$m->setDimension(640, 480);
$m->add($s);
$m->output();