AMF::Perl - Flash Remoting in Perl and Python

To use AMF::Perl, download it and install in the usual way (perl Makefile.PL; make; make install).

To build/export .swf files with "Flash Remoting" you need to install Flash Remoting MX Components (free download). This will install the files "NetServices.as" and "NetDebug.as" that are used in the ActionScript.

Sample code that uses Flash Remoting

(See also examples that are distributed with the module).
Read this if you want to send and receive strings in non-English encodings.

Client code:

Server code, option A - service registration.

Use in simple applications.

Perl

Python

File cpu.py: File cpuUsage.py:

Server code, option B - limited service discovery.

Use in complex applications.

Part 1. The gateway script.

Perl	Python
use AMF::Perl; #Create the gateway object my $gateway = AMF::Perl->new; #Set a directory that will contain Perl package. #Each package will correspond to one service - #there can be as many as you want! #You can set only one class path, though. $gateway->setBaseClassPath("./basicservices/"); #Let the gateway figure out who will be called. $gateway->service();	#!/usr/bin/python from AMF import AMF import sys import os gateway = AMF.AMF() gateway.setRelativeBaseClassPath("/basicservices") gateway.service()

Part 2. Sample class in the registered directory.

Perl

Python

package DataEcho;

sub new
{
    my ($proto)=@_;
    my $self={};
    bless $self, $proto;
    return $self;
}

sub echoNormal
{
    my ($self, $data) = @_;
    return $data;
}
sub echoDate
{
    my ($self, $data) = @_;
    return $data;
}
sub echoXML
{
    my ($self, $data) = @_;
    return $data;
}

sub methodTable
{
    return {
        "echoNormal" => {
            "description" => "Echoes the passed argument back to Flash (no need to set the return t
ype)",
            "access" => "remote", # available values are private, public, remote
        },
        "echoDate" => {
            "description" => "Echoes a Flash Date Object (the returnType needs setting)",
            "access" => "remote", # available values are private, public, remote
            "returns" => "date"
        },
        "echoXML" => {
            "description" => "Echoes a Flash XML Object (the returnType needs setting)",
            "access" => "private", # available values are private, public, remote
            "returns" => "xml"
        }
    };
}

import sys
class DataEcho:
    
    def echoNormal(self, arg):
        return arg

def echoDate(self, arg):
        return arg

def echoXML(self, arg):
        return arg

def methodTable(self):
        table = {}
        table["echoNormal"]= {
                    "description" : "Echoes the passed argument back to Flash (no need to set the return type)",
                    "access" : "remote", # available values are private, public, remote
            }
        table["echoDate"] = {
                    "description" : "Echoes a Flash Date Object (the returnType needs setting)",
                    "access" : "remote", # available values are private, public, remote
                    "returns" : "date"
            }
        table["echoXML"] = {
                    "description" : "Echoes a Flash XML Object (the returnType needs setting)",
                    "access" : "private", # available values are private, public, remote
                    "returns" : "xml"
            }
        return table