+use strict;
+use WWW::Mediawiki::Client;
+#sub WWW::Mediawiki::Client::pagename_to_url {
+# my ($self, $name, $action) = @_;
+# WWW::Mediawiki::Client::URLConstructionException->throw(
+# error => 'No action supplied.',
+# ) unless $action;
+# WWW::Mediawiki::Client::URLConstructionException->throw(
+# error => "Page name $name ends with '.wiki'.",
+# ) if $name =~ /.wiki$/;
+# my $char = $self->space_substitute;
+# $name =~ s/ /$char/;
+# my $lang = $self->language_code;
+# my $host = $self->host;
+# $host =~ s/__LANG__/$lang/g;
+# my $wiki_path = $self->wiki_path;
+# $wiki_path =~ s/__LANG__/$lang/g;
+# my $protocol = $self->protocol;
+# return "$protocol://$host/$wiki_path?" . ACTION . "=$action&" . TITLE . "=$name" . '&wpRecreate=1';
+#}
+
+my $mw_username = 'ivan';
+chomp( my $mw_password = `cat .mw-password` );