How to get links from .swf files ?

gube has asked for the wisdom of the Perl Monks concerning the following question:

Hi monks,

I have a .swf file. In that file, i need to extract all the links. Is anyone refer the module are provide sample code or ideas please share.

Thanks in advance..