if $line =~ /^myword\s+/ {
     $line =~ s/^myword myobject,options//g
    }