$buffer=~s/\r/\n/gs;
print STATION $buffer;