my $data_separator = "\t";
my $line_separator = "\n";
print $file join( $data_separator, $point, $title, $dicription, $icon, $size, $offset ) . $line_separator;