#!/usr/bin/perl -i.b -w
while(<>){
s=../articles/a=a=g;
s="Topbar.gif="../../common/images/Topbar-ru.gif=g;
s="Bottombar.gif="../../common/images/Bottombar-ru.gif=g;
s="Ken-Y.gif="../../common/images/Ken-Y.gif=g;
s="Guido-S.gif="../../common/images/Guido-S.gif=g;
s="Penelope-M.gif="../../common/images/Penelope-M.gif=g;
s="lsperl.gz="../../common/src/lsperl.gz=g;
s="grepfind.gz="../../common/src/grepfind.gz=g;
s="illustration="../../common/images/illustration=g;

s="article2.html="article63.html=g;
s="article3.html="article64.html=g;
s="article5.html="article65.html=g;
s="article6.html="article66.html=g;
print;
}