Help for this page
system("SQL", "<", "calfile.txt");
open IN, "<calfile.txt" or die "Aaargh: $!\n"; open OUT, "|SQL" or die "Ooops: $!\n"; print OUT, <IN>; close OUT; close IN;