1#!/usr/bin/perl 2while(<>) 3{ 4 s/D3D11_SRV_DIMENSION_/D3D10_1_SRV_DIMENSION_/g; 5 s/D3D11/D3D10/g; 6 s/D3D10_SIGNATURE_PARAMETER_DESC/D3D11_SIGNATURE_PARAMETER_DESC/g; 7 s/D3D_FEATURE_LEVEL_/D3D10_FEATURE_LEVEL_/g; 8 s/D3D_FEATURE_LEVEL/D3D10_FEATURE_LEVEL1/g; 9 s/^#define API 11/#define API 10/; 10 s/^(#include "d3d1)1(_[^.]*)(.h")/${1}0$2.generated$3/; 11 print $_; 12} 13