The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

SWFEditor - SWFEditor for Perl

SYNOPSIS

    use SWFEditor;

    # case: file path
    my $swfed = SWFEditor->new();
    $swfed->input('resource/negimiku.swf');
    $swfed->replace_movie_clip('miku', 'resource/saitama3.swf');
    print $swfed->output();

    # case: binary data
    my $data1 = do {local $/; <$fh>};
    my $data2 = do {local $/; <$fh>};
    my $swfed = SWFEditor->new();
    $swfed->input(\$data1);
    $swfed->replace_movie_clip('miku', \$data2);
    print $swfed->output();

DESCRIPTION

This module is perl binding of SWF Editor.

More description: http://sourceforge.jp/projects/swfed/wiki/FrontPage

METHODS

Implemented function list

i/o

$swfed->input(string $swfdata)
$swfed->output()

dump

$swfed->swf_info()
$swfed->get_tag_list()
$swfed->get_tag_detail(int $seqno)
$swfed->get_header_info()
$swfed->set_header_info(hashref \%header_info)

tag

$swfed->get_tag_data(int $seqno)
$swfed->get_tag_data_by_cid(int $cid)
$swfed->replace_tag_data(int $seqno, string $data)
$swfed->replace_tag_data_by_cid(int $cid, string $data)
$swfed->get_tag_contents_by_cid(int $cid)
$swfed->replace_tag_contents_by_cid(int $cid, string $data)
$swfed->is_shape_tag_data(string $data)
$swfed->is_bitmap_tag_data(string $data)
$swfed->print_tag_data(string $tagdata)
$swfed->remove_tag(int $tag_seqno, int $tag_seqno_in_sprite)

sprite

$swfed->replace_movie_clip(string $instance_name, string $swfdata, int $unused_cid_purge = 1)

shape

$swfed->get_shape_data(int $shape_id)
$swfed->replace_shape_data(int $shape_id, string $shapedata)
$swfed->set_shape_adjust_mode($int mode)
$swfed->set_shape_adjust_mode_none()
$swfed->set_shape_adjust_mode_matrix_rescale()
$swfed->set_shape_adjust_mode_rect_resize()
$swfed->set_shape_adjust_mode_type_tilled()

image

$swfed->get_jpeg_data(int $image_id)
$swfed->get_jpeg_alpha(int $image_id)
$swfed->get_png_data(int $image_id)
$swfed->replace_bitmap_data(hashref \%image_cond | $image_id, string $bitmapdata, string $alphadata = undef, hashref \%opts | int $without_converting)
$swfed->replace_png_data($image_id, $pngdata)
$swfed->replace_gif_data($image_id, $gifdata)
$swfed->replace_jpeg_data($image_id, $jpegdata)
$swfed->get_bitmap_size(int $image_id)

text

$swfed->get_edit_string(string $variable_name | int $edit_id)
$swfed->replace_edit_string(string $variable_name | int $edit_id, string $text)

sound

$swfed->get_sound_data(int $sound_id)
$swfed->replace_mld_data(int $sound_id, string $mlddata)

action

$sefed->get_action_data(int $tag_seqno)
$swfed->set_action_variables(hashref \%replace_key_value_pair)
$swfed->replace_action_strings(hashref \%replace_key_values_pair)

misc

$swfed->set_compress_level(int $level)
$swfed->purge_unless_contents()
$swfed->rebuild()

SEE ALSO

SWF Editor for PHP: http://sourceforge.jp/projects/swfed/

RESOURCES

REPOSITORY: https://github.com/mix3/p5-SWFEditor/

AUTHOR

Wataru Seto(mix3) <himachocost333@gmail.com>