Gossamer Forum
(Advanced Search)
for
Home : General : Perl Programming :

Please help russian!

Aug 15, 2004, 10:19 AM
TS
New User (1 post)
Aug 15, 2004, 10:19 AM
Post #1 of 2
Views: 3231
Shortcut
Quote Reply
Please help russian!
Please help russian pour perl programmer!

Can you in simple phrases explain me, how to load file, convert it to an array and find in it a necessary value...

Has i written it correctly?
Aug 19, 2004, 12:11 AM
muzicman
New User (3 posts)
Aug 19, 2004, 12:11 AM
Post #2 of 2
Views: 3093
Shortcut
Quote Reply
Re: [TS] Please help russian! In reply to
 
if (open (FIL, $fileName)) {
@FIL = <FIL>;
close FIL;
} else {
print die "$fileName not found\n";
}

$temp = "";
for $o (@FIL) {
$temp .= $o;
}

if ($temp =~ /hello/gi) { print "Found hello"; }