Help for this page
if (defined $line and $line =~ /(\bTest\b\s+.+\s+\baccount\b)?/)
if ( ($line // '') =~ /(\bTest\b\s+.+\s+\baccount\b)?/)