Flash file size(height and width)

cheeku

Hi All,
i am trying to retrieve the flash Movie size(height and width). It is giving me size '0*0' if i am using 'html_imgsize' or 'imgsize'. Instead i also tried using 'swfsize'. But it hangs and not able to get the swf file size
This subroutine hangs at second line in following subroutine ( my $header = &$read_in($image, 33)
i am not sure what this &$read_in($image, 33) is doing. I could not find read_inb subroutine in whole size.pm fil.
can anybody give me any pointers on this and give me sample code which is actually reteriving flash file size?

sub swfsize
{
my $image = shift;
my $header = &$read_in($image, 33);

sub _bin2int { unpack("N", pack("B32", substr("0" x 32 . shift, -32))); }

my $ver = _bin2int(unpack 'B8', substr($header, 3, 1));
my $bs = unpack 'B133', substr($header, 8, 17);
my $bits = _bin2int(substr($bs, 0, 5));
my $x = int(_bin2int(substr($bs, 5+$bits, $bits))/20);
my $y = int(_bin2int(substr($bs, 5+$bits*3, $bits))/20);

return ($x, $y, 'SWF');
}

Adam Stoller

I haven't had to deal with Shockwave / Flash movie files - but doing a quick search of search.cpan.org leads me to believe the following modules might be of use:

• Image:ize - generic utilities for size information.
• SWF::Header - specific utilities for SWF files.
• File::Headerinfo:WF - lacking good documentation, but included because it might help if the others do not.

Image:ize comes with TeamSite I believe, the other two you would have to download and install from CPAN.

Image:ize looks like it would be pretty easy to use - something like:...
use Image:ize;
...
my ($size_x, $size_y) = imgsize($swffile);
...The $read_in thing is a reference to a subroutine, and actually, if you read the code - it's an abstraction pointing to one of several possible references to subroutines based upon whichever mode you initialized Image:ize for and/or whether it's reading the information from a file or datastream - however - you really shouldn't care about it as its an internal piece of the module and not something you should be mucking with. You certainly shouldn't be using it in your own code (swfsize is yours? or coming from some module?)

--fish
Senior Consultant, Quotient Inc.
http://www.quotient-inc.com