b0a17t000000d20030228t132953r2341201630.pl

A Flash Player with ActionScript support. Write in C and C++. It have two part, one is Player and an

#!/usr/bin/perl
use X11::GUITest qw/
StartApp
WaitWindowViewable
SendKeys
ClickWindow
/;
# Start gedit application
StartApp('./fplayer -f B0a17T000000D20030228T132953R2341201630.SWF|grep GetURL');
# Wait for application window to come up and become viewable.
my ($FTestWinId) = WaitWindowViewable('B0a17T000000D20030228T132953R2341201630.SWF');
if (!$FTestWinId) {
    die("Couldn't find gedit window in time!");
}
 ClickWindow($FTestWinId,425,116,);sleep(2);  ##
 ClickWindow($FTestWinId,320,267,);sleep(2);  ##
 ClickWindow($FTestWinId,320,236,);sleep(2);  ##
 ClickWindow($FTestWinId,319,338,);sleep(2);  ##
 ClickWindow($FTestWinId,520,413,);sleep(2);  ##
 ClickWindow($FTestWinId,480,341,);sleep(2);  ##
 ClickWindow($FTestWinId,326,412,);sleep(2);  ##
 ClickWindow($FTestWinId,605,451,);sleep(2);  ##
 ClickWindow($FTestWinId,435,218,);sleep(2);  ##
 ClickWindow($FTestWinId,577,362,);sleep(2);  ##
 ClickWindow($FTestWinId,608,453,);sleep(2);  ##
 ClickWindow($FTestWinId,489,336,);sleep(2);  ##
 ClickWindow($FTestWinId,615,454,);sleep(2);  ##
 ClickWindow($FTestWinId,447,377,);sleep(2);  ##
 ClickWindow($FTestWinId,610,455,);sleep(2);  ##
sleep(2);`killall fplayer`;