Help for this page

Select Code to Download

Select or download this

# Windows syntax
my $size = `swfdump -X -Y "$qfn"`
   or die "...";
my ($x, $y) = $size =~ /^-X (\d+) -Y (\d+)$/
   or die "...";