如何通过perl程序将数据以txt文本输出

如何通过perl程序将数据以txt文本输出

如何通过perl程序将数据以txt文本输出
最近在搞sflow数据解码,想请教下怎样将解码后的数据以txt文本格式输出解码数据?
open FH,'data.txt' or di.
open FH,'data.txt' or die "Can't open file: $!";
print FH $data;
close FH;