3 perl
-pi -e 's/DrawLine\(/DrawLineXY\(/g' *.py
4 perl
-pi -e 's/DrawRectangle\(/DrawRectangleXY\(/g' *.py
5 perl
-pi -e 's/DrawBitmap\(/DrawBitmapXY\(/g' *.py
6 perl
-pi -e 's/DrawText\(/DrawTextXY\(/g' *.py
7 perl
-pi -e 's/SetClippingRegion/SetClippingRegionXY/g' *.py