- my ($self, $htc, $path, $lang) = @_;
-
- $path =~ m,(?:ct/([^/]+)/)?pb/(\w+)\.html$,;
-
- my ($contest, $id) = ($1, $2);
+ my ($self, $htc, $lang, $env, $contest, $id) = @_;
+ debug $env => "language is '$lang', contest is '$contest', id is '$id'";