[Bio] / Sprout / LoadTableTest.pl Repository:
ViewVC logotype

View of /Sprout/LoadTableTest.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (download) (as text) (annotate)
Tue Feb 14 19:20:31 2012 UTC (7 years ago) by parrello
Branch: MAIN
CVS Tags: rast_rel_2014_0729, mgrast_version_3_2, rast_rel_2014_0912, HEAD
Checkpoint before field-name changes.

use strict;
use File::Temp;

my $fh = File::Temp->new(TEMPLATE => 'load_rel_hello_XXXXXX', SUFFIX => '.dtx', UNLINK => 1, DIR => File::Spec->tmpdir());
print $fh "123\t456\n";
print $fh "789\tabc\n";
close $fh;
my $fileName = $fh->filename;
open my $ih, "<$fileName";
while (my $line = <$ih>) {
    print $line;
}

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3