in reply to Re: <DATA> file handle not working with Perl Starwbery 5.12.1
in thread <DATA> file handle not working with Perl Starwbery 5.12.1

This works fine for me.

#! perl # use strict; use warnings; while(<DATA>){ print if /Norma/; } __DATA__ Steve Blenheim Betty Boop Igor Chevsky Norma Cord

Result

perl "D:\perl_TK\DBperl\perl6data.pl" Process started >>> Norma Cord <<< Process finished.

Replies are listed 'Best First'.
thank you
by sufi (Initiate) on Dec 23, 2010 at 07:11 UTC
    Hi Thank you for help Cheers Sufi