Hi,
Iam unable to debug this code.
pls help me.
here is the code :

open(FILE,"build.txt") ||die "cannot open \n";
print "select which build you want to enter\n";
$build=<STDIN>;
while(<FILE>)
{
        if(/$build/)
                {
                print "you selected $build\n";
                #here it should print next 3 0r 4 lines until space comes
                }
        else
        {
        print "$build is not found\n";
        }
}

If build1 is found it should print next 3 lines (or till space comes)

for ex build.txt file :
build1
rpm_1;
rpm_2;
qwe_3;

build2
qwe-1;
asd_2;
asd_3;

if I selected build1 ,it should print rpm_1 to qwe_3
cheers,
prasanthi.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to