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)

header

$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>

cpanm SWFEditor

perl -MCPAN -e shell
install SWFEditor