In the following code I am having trouble using the continue statement:
while ($more)
{
if (read IPFILE, $alarm, 10)
{
if (read IPFILE, $workorder, 8)
{
if (read IPFILE, $errcodes, 50)
{
open OPFILE, "> ${minenv_run}/work/arts/outgoing/${alarm}.T
";
printf(OPFILE "%s", $errcodes);
close OPFILE;
rename "${minenv_run}/work/outgoing/${alarm}.T",
"${minenv_run}/work/outgoing/${alarm}.E";
# continue;
}
else
{
open OPFILE, "> ${minenv_run}/work/arts/outgoing/${alarm}.T
";
printf(OPFILE "%s", $workorder);
close OPFILE;
rename "${minenv_run}/work/outgoing/${alarm}.T",
"${minenv_run}/work/outgoing/${alarm}.C";
# continue;
}
}
Any help gratefully received
while ($more)
{
if (read IPFILE, $alarm, 10)
{
if (read IPFILE, $workorder, 8)
{
if (read IPFILE, $errcodes, 50)
{
open OPFILE, "> ${minenv_run}/work/arts/outgoing/${alarm}.T
";
printf(OPFILE "%s", $errcodes);
close OPFILE;
rename "${minenv_run}/work/outgoing/${alarm}.T",
"${minenv_run}/work/outgoing/${alarm}.E";
# continue;
}
else
{
open OPFILE, "> ${minenv_run}/work/arts/outgoing/${alarm}.T
";
printf(OPFILE "%s", $workorder);
close OPFILE;
rename "${minenv_run}/work/outgoing/${alarm}.T",
"${minenv_run}/work/outgoing/${alarm}.C";
# continue;
}
}
Any help gratefully received