Help for this page
open FILE , "< /home/you/your.file";
open FILE, "/home/you/your.file" or die "Cannot open: $!";
#!/usr/bin/perl -w ... print join("\t" , @{$data{$_}}), "\n"; }