sys2wonx.pl 129 B

123456
  1. #!/usr/local/bin/perl
  2. while (<STDIN>) {
  3. s/^(\s*\#\s*include\s*)[\<\"]sys\/(.+\.h)[\>\"]/$1\"wonx_include\/$2\"/i;
  4. print $_;
  5. }