# Process with perlpp, https://github.com/interpreters/perlpp
?>
Tests of chrome-dont-add-custom-search-engines
my $formidx = 0;
for my $method ('', 'get') {
for my $action (undef, '', 'foo', '/bar', 'http://example.com/bat',
'https://example.com/quux', 'ftp://example.com/quuux') {
for my $input_type ('text', 'search') {
for my $attr ('id', 'name') {
for my $name ('q', 'action') {
?>
}
}
}
}
}
?>