Re: FileHandle

[Rob Dixon]

Kaushal Shriyan wrote:

Hi

I am using FileHandle, Below is my code
########################################

#!/usr/bin/perl

use warnings;
use strict;

open(LOGFILE, "messages")
        || warn "Could not open messages";
open(DATA, ">/tmp/data") || die "Could not create /tmp/data\n."

while (<LOGFILE>) {
        print "$_\n" if /MARK/;
}
#######################################

I am getting syntax error

I know i am doing wrong, please let me know whats causing the issue.

You have missed the semicolon from the end of your second 'open'
statement.

Rob

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/