Select Code to Download

$ perl -MO=Deparse   -pi -e 's/\/Im0\ Do//g'
BEGIN { $^I = ""; }
...
}
-e syntax OK

#!/usr/bin/perl
use warnings;
...
    print;
}