#!/usr/bin/perl

# this is a quick hack to convert intrface.txt back into intrface.def

open F,"<intrface.txt";
open OF,">intrface.def";

print OF chr(0xff);
print OF chr(0xfe);

while (<F>)
{
  s/(.)/$1\0/gs;
  print OF;
}
close F;
close OF;