perl -p0777i -e "s/^([^\xFF]+.{5067})L(\0\0.{429})L(.+)\xe2\x02\xe3\x02..$/$1\x60$2\x60$3/s||print STDERR qq{$ARGV\n}" ../asma/Composers/Jacob_Uwe/*.sap ../asma/Misc/Death_Rides_a_Horse.sap ../asma/Misc/Strangers_in_the_Night.sap ../asma/Unknown/Demomus.sap ../asma/Unknown/God_Save_the_Queen_1.sap ../asma/Unknown/God_Save_the_Queen_2.sap ../asma/Unknown/Let_It_Be.sap ../asma/Unknown/River.sap ../asma/Unknown/Rock_1.sap ../asma/Unknown/Rock_2.sap ../asma/Unknown/Somebody.sap ../asma/Unknown/Tblues.sap ../asma/Unknown/Walzer.sap
