Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

Re: Perl Flash

by IlyaM (Parson)
on Mar 20, 2002 at 19:38 UTC ( #153100=note: print w/replies, xml ) Need Help??


in reply to Perl Flash

Very long time ago I've wrote some Perl code which interfaced with Flash. Take all what I say with grain of salt because I almost forgot everything about it. I just can be wrong. Anyway following information could be useful.

IIRC in Flash you can have variables which values can be obtained from external source: text file in very simple format:

var1=value1 var2=value2
When Flash file runs it can request this text file for values of variables from web server. Of course instead of text file you can have Perl CGI which generates text file on the fly.

Now the question if you can use values of Flash variables in URLs. May be yes, may be not. If yes you can use Flash variables and Perl CGI to create urls on fly. If not, I'm sorry.

--
Ilya Martynov (http://martynov.org/)

Replies are listed 'Best First'.
Re: Re: Perl Flash
by mt2k (Hermit) on May 28, 2002 at 00:26 UTC
    I know that this is quite a late reply, but I have just recently installed Flash 5 and have an answer to this question. IlyaM is definitely on the right track. Using a perl script to output the URLs to the swf file is the way to go.

    Example:

    First let's create the flash (swf) file:

    1. Create a new flash project.
    2. Select one of the shape tools (square, circle, etc) and draw a quick shape.
    3. Use the 'select tool' to select the shape and hit F8 (or go to Insert->Convert to Symbol) Select the button option and hit OK.
    4. Right-click this button on your stage and select 'Actions'. This is where ActionScript comes into play
    5. Click the right-pointing arrow at the top of the little 'Actions' window. Select the 'Expert Mode' option.
    6. Copy and paste the following code into the right-hand side textbox:

      on (release) { loadVariablesNum ("/path/to/script.pl", 0); getURL (address, "_blank"); }
    7. Make sure you replace "path/to/script.pl" to the path of the perl script.
    8. Note that the getURL() function is passed address and not "address". This is because address is the variable name we will send to flash via the perl script.

    Next up we have the perl script:

    1. Open your favorite script editor and enter the following code:

    #!/path/to/perl -w use strict; use URI::Escape; my $url = "http://www.yahoo.com"; print "Content-type: text/plain\n\naddress=$url";

    2. $url is the URL of the page you want flash to open when you click that button you created. Note that the script passes the url via the 'address' variable.

    There, you have something that works! Of course, this could be made much better by allowing the passing of multiple URLs to the flash file, but that can be homework ;)

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://153100]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (4)
As of 2022-12-03 05:42 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?