Try to use SWF::Parser
CPAN is your the best friend!!!

      
--------------------------------
SV* sv_bless(SV* sv, HV* stash);