if ($options(C) && grep /line/,@array)
{
print $line;
}

##</code><code>##

if ($options(C) && grep /line/,@array)
{
print $line;
}
else #when option "c" is not given
{
print $line;
}