- or download this
#!/usr/bin/perl
use strict;
use warnings;
- or download this
open FILE, "/home/ajb004/Paradigms/roster.txt" or die $!;
- or download this
$_;
- or download this
$_ = $word;
s/_/ /g;
print "ID: $_\n";
- or download this
$word =~ s/_/ /g;
print "ID: $word\n";
- or download this
while ( my $line = <FILE> )
{
...
print "ID: $word\n";
}
}
- or download this
#!/usr/bin/perl
use strict;
...
TEXT
}