use strict;
use warnings;

use XML::Twig qw( );

binmode STDOUT;

my $t = XML::Twig->new(
   twig_handlers => {
      'image[@scope="local"]' => sub {
         $_->del_att('scope');
      },
   },
);
$t->parsefile($ARGV[0]);
$t->flush();
[download]