$page =~ s/\[\[(\w+)\]\]/$tokens{$1}/ge;