List of English irregular verbs in perl hash

Format: ps means past simple or preterite pp means past participle com means comment

reg=>1 means that most common are regular forms of this verb reg=>2 means that regular forms of this verb are possible, but not the most common

We define a verb as a regular if $base =~ /[^ey]$/ && $ps eq $base.'ed' && $pp eq $base.'ed' or $base =~ /e$/ && $ps eq $base.'d' && $pp eq $base.'d'

So f.e. bet/betted/betted is NOT regular.