use strict;
my $str = '<html>
<head>
<title>O\'Reilly\'s CD bookshelf</title>
</head>
<body margin="10" bgcolor=white>
<center><script type="text/javascript">document.write(\'<a href=http://docstore.mik.ua/orelly/index.html>O\\\'Reilly\\\'s CD bookshelfs</a> | <a href=http://docstore.mik.ua/manuals/freebsd.html>FreeBSD</a> | <a href=http://docstore.mik.ua/manuals/linux.html>Linux</a> | <a href=http://docstore.mik.ua/univercd/cc/td/doc/product/>Cisco</a> | <a href=http://www.e-reading.org.ua>e-Reading Library</a>\');</script> <g:plusone size=medium></g:plusone><br>
</center><hr width=80% size=1>
<table border=0 width=100%><tr><td style="vertical-align: top; width: 200px;">
<br><br><br><br><br><br>
<script type="text/javascript"><!--
google_ad_client = "pub-0321943928525350";
/* 160x600, o-rightfixed */
google_ad_slot = "5248352378";
google_ad_width = 160;
google_ad_height = 600;
//-->
</script>
<script type="text/javascript"
src="../../pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
</td><td style="vertical-align: top;">
<center>
<FONT FACE="Arial,Helvetica,*"><B>O\'Reilly\'s CD bookshelf
<TABLE BORDER=0><TR><TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Java Reference Library</b>, version 1.3
<TD><IMG SRC="java/gifs/navbar.jpg" USEMAP="#map1" BORDER=0>
<MAP NAME="map1">
<AREA SHAPE=RECT COORDS="0,0,65,71" HREF="java/index.htm">
<AREA SHAPE=RECT COORDS="66,0,162,71" HREF="java/javanut/index.htm"
alt="Java in a Nutshell">
<AREA SHAPE=RECT COORDS="163,0,253,71" HREF="java/langref/index.htm"
alt="Java Language Reference">
<AREA SHAPE=RECT COORDS="254,0,350,71" HREF="java/awt/index.htm"
alt="Java AWT">
<AREA SHAPE=RECT COORDS="351,0,441,71" HREF="java/fclass/index.htm"
alt="Java Fundamental Classes">
<AREA SHAPE=RECT COORDS="442,0,515,71" HREF="java/exp/index.htm"
alt="Exploring Java">
</MAP>
<TR><TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Java Enterprise CD Bookshelf</b>, Version 1.0
<TD>
<img src="java-ent/gifs/smnavbar.gif" usemap="#map8" border="0" alt="Library Navigation Links">
<map name="map8">
<area shape="rect" coords="-8,-5,72,97" href="java-ent/index.htm">
<area shape="rect" coords="75,2,150,109" href="java-ent/jenut/index.htm">
<area shape="rect" coords="154,0,225,99" href="java-ent/jnut/index.htm">
<area shape="rect" coords="228,3,298,112" href="java-ent/jfc/index.htm">
<area shape="rect" coords="306,1,373,124" href="java-ent/ebeans/index.htm">
<area shape="rect" coords="380,2,446,115" href="java-ent/servlet/index.htm">
<area shape="rect" coords="452,1,524,101" href="java-ent/security/index.htm">
<area shape="rect" coords="528,2,610,102" href="java-ent/dist/index.htm"> </map>
</map>
</TR>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Perl CD Bookshelf</b>, version 1.0
<TD>
<img src="perl/gifs/navbar.gif" usemap="#map2" border=0 alt="The Perl
CD Bookshelf Navigation">
<map name="map2">
<area shape=rect coords="0,0,69,62" href="perl/index.html"
alt="Perl index">
<area shape=rect coords="70,0,145,62" href="perl/perlnut/index.htm"
alt="Perl in a Nutshell">
<area shape=rect coords="146,0,210,62" href="perl/learn/index.htm"
alt="Learning Perl">
<area shape=rect coords="211,0,284,62" href="perl/learn32/index.htm"
alt="Learning Perl on Win32 Systems">
<area shape=rect coords="285,0,362,62" href="perl/prog/index.htm"
alt="Programming Perl">
<area shape=rect coords="363,0,436,62" href="perl/advprog/index.htm"
alt="Advanced Perl Programming">
<area shape=rect coords="437,0,514,62" href="perl/cookbook/index.htm"
alt="Perl Cookbook">
</map>
</TR>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Perl CD Bookshelf</b>, version 2.0
<TD>
<img src="perl/gifs/smnavbar.gif" usemap="#library-map" border="0" alt="Library Navigation Links">
<map name="library-map"><area shape="rect" coords="2,-1,79,99" href="perl2/prog/index.htm">
<area shape="rect" coords="84,1,157,108" href="perl2/perlnut/index.htm">
<area shape="rect" coords="162,2,248,125" href="perl2/prog/index.htm">
<area shape="rect" coords="253,2,326,130" href="perl2/advprog/index.htm">
<area shape="rect" coords="332,1,407,112" href="perl2/cookbook/index.htm">
<area shape="rect" coords="414,2,523,103" href="perl2/sysadmin/index.htm">
</map>
</TR>
<TR>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Perl CD Bookshelf</b>, version 3.0
<TD>
<img src="perl3/gifs/smnavbar.gif" usemap="#perl3-map" border="0" alt="Library Navigation Links">
<map name="perl3-map">
<area shape="rect" coords="1,0,85,94" href="perl3/index.htm">
<area shape="rect" coords="86,1,178,103" href="perl3/lwp/index.htm">
<area shape="rect" coords="180,0,265,103" href="perl3/lperl/index.htm">
<area shape="rect" coords="267,0,353,105" href="perl3/perlnut/index.htm">
<area shape="rect" coords="354,1,446,115" href="perl3/prog/index.htm">
<area shape="rect" coords="448,0,526,132" href="perl3/tk/index.htm">
<area shape="rect" coords="528,1,615,119" href="perl3/cookbook/index.htm">
<area shape="rect" coords="617,0,690,135" href="perl3/pxml/index.htm">
</map>
</TR>
<TR>
<td valign=CENTER>
<font face="Arial,Helvetica,*"><b>The Perl CD Bookshelf</b>, version 4.0
<td>
<img src="perl4/gifs/navbar.gif" usemap="#perl4" border="0">
<map name="perl4">
<area shape="rect" coords="1,0,74,98" href="perl4/index.htm">
<area shape="rect" coords="75,1,191,114" href="perl4/porm/index.htm">
<area shape="rect" coords="193,1,282,126" href="perl4/lperl/index.htm">
<area shape="rect" coords="283,1,377,104" href="perl4/perlnut/index.htm">
<area shape="rect" coords="378,-2,480,135" href="perl4/prog/index.htm">
<area shape="rect" coords="481,1,581,134" href="perl4/cook/index.htm">
<area shape="rect" coords="582,2,705,151" href="perl4/mre/index.htm">
</map>
</TR>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Networking CD Bookshelf</b>, version 1.0
<TD>
<img src="networking/gifs/navbar.gif" usemap="#map3" border=0 alt="The Networking
CD Bookshelf Navigation">
<map name="map3">
<area shape=rect coords="0,0,69,62" href="networking/index.htm"
alt="Home">
<area shape=rect coords="70,0,145,62" href="networking/dnsbind/index.htm"
alt="DNS & BIND">
<area shape=rect coords="146,0,216,62" href="networking/tcpip/index.htm"
alt="TCP/IP Network Administration">
<area shape=rect coords="217,0,280,62" href="networking/sendmail/index.htm"
alt="sendmail">
<area shape=rect coords="281,0,362,62" href="networking/smdref/index.htm"
alt="sendmail Desktop Reference">
<area shape=rect coords="363,0,433,62" href="networking/firewall/index.htm"
alt="Building Internet Firewalls">
<area shape=rect coords="434,0,514,62" href="networking/puis/index.htm"
alt="Practical UNIX & Internet Security">
</map>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Networking CD Bookshelf</b>, Version 2.0
<TD>
<img src="networking_2ndEd/gifs/navbar.gif" usemap="#map3-1" border=0 alt="The Networking
CD Bookshelf Navigation">
<map name="map3-1"><area shape="rect" coords="1,0,84,90" href="networking_2ndEd/index.htm" />
<area shape="rect" coords="86,-7,176,90" href="networking_2ndEd/ssh/index.htm" />
<area shape="rect" coords="178,0,265,101" href="networking_2ndEd/tcp/index.htm" />
<area shape="rect" coords="266,0,333,90" href="networking_2ndEd/nfs/index.htm" />
<area shape="rect" coords="334,-1,429,93" href="networking_2ndEd/snmp/index.htm" />
<area shape="rect" coords="431,0,529,116" href="networking_2ndEd/tshoot/index.htm" />
<area shape="rect" coords="534,0,594,104" href="networking_2ndEd/dns/index.htm" />
<area shape="rect" coords="595,1,704,108" href="networking_2ndEd/fire/index.htm" /></map>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The UNIX CD Bookshelf</b>, version 1.0
<TD>
<img src="unix/gifs/navbar.gif" usemap="#map4" border=0 alt="The UNIX CD
Bookshelf Navigation">
<map name="map4">
<area shape=rect coords="0,0,69,62" href="unix/index.htm"
alt="Home">
<area shape=rect coords="70,0,145,62" href="unix/upt/index.htm" alt="UNIX
Power Tools">
<area shape=rect coords="146,0,216,62" href="unix/unixnut/index.htm"
alt="UNIX in a Nutshell">
<area shape=rect coords="217,0,294,62" href="unix/vi/index.htm"
alt="Learning the vi Editor">
<area shape=rect coords="295,0,362,62" href="unix/sedawk/index.htm"
alt="sed & awk">
<area shape=rect coords="363,0,440,62" href="unix/ksh/index.htm"
alt="Learning the Korn Shell">
<area shape=rect coords="441,0,514,62" href="unix/lrnunix/index.htm"
alt="Learning the UNIX Operating System">
</map>
</TR>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The UNIX CD Bookshelf</b>, version 2.1
<TD>
<img src="unix2.1/gifs/navbar.gif" usemap="#unix21-map" border=0 alt="The UNIX CD Bookshelf Navigation">
<map name="unix21-map"">
<area shape=rect coords="0,0,69,62" href="unix2.1/index.htm" alt="Home">
<area shape=rect coords="70,0,145,62" href="unix2.1/upt/index.htm" alt="UNIX" power tools">
<area shape=rect coords="146,0,216,62" href="unix2.1/unixnut/index.htm" alt="UNIX in a Nutshell">
<area shape=rect coords="217,0,294,62" href="unix2.1/vi/index.htm" alt="Learning the vi Editor">
<area shape=rect coords="295,0,362,62" href="unix2.1/sedawk/index.htm" alt="sed & awk">
<area shape=rect coords="363,0,440,62" href="unix2.1/ksh/index.htm" alt="Learning the Korn Shell">
<area shape=rect coords="441,0,514,62" href="unix2.1/lrnunix/index.htm" alt="Learning the UNIX Operating System">
</map>
</td></tr>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The UNIX CD Bookshelf</b>, version 3.0
<TD>
<img src="unix3/gifs/navbar.gif" usemap="#unix3" border=0 alt="The UNIX CD bookshelf navigation">
<map name="unix3">
<area shape="rect" coords="1,0,88,96" href="unix3/index.htm">
<area shape="rect" coords="90,0,165,96" href="unix3/upt/index.htm">
<area shape="rect" coords="168,1,253,107" href="unix3/mac/index.htm">
<area shape="rect" coords="255,0,335,97" href="unix3/korn/index.htm">
<area shape="rect" coords="337,0,415,109" href="unix3/unixnut/index.htm">
<area shape="rect" coords="417,0,512,122" href="unix3/sedawk/index.htm">
<area shape="rect" coords="514,0,605,105" href="unix3/lunix/index.htm">
<area shape="rect" coords="611,2,694,121" href="unix3/vi/index.htm">
</map>
</td>
</tr>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>Web Developer`s Library
<TD>
<IMG SRC="web/gifs/navbar.gif" USEMAP="#map5" BORDER=0>
<MAP NAME="map5">
<AREA SHAPE=RECT COORDS="0,0,65,71" HREF="web/index.html">
<AREA SHAPE=RECT COORDS="66,0,162,71" HREF="web/html/index.html">
<AREA SHAPE=RECT COORDS="163,0,253,71" HREF="web/cgi/index.html">
<AREA SHAPE=RECT COORDS="254,0,350,71" HREF="web/jscript/index.html">
<AREA SHAPE=RECT COORDS="351,0,441,71" HREF="web/perl/index.html">
<AREA SHAPE=RECT COORDS="442,0,515,71" HREF="web/webnut/index.html">
</MAP>
</td></tr>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>Web Developer\'s Library</b>, version 1.0
<TD>
<img src="web2/gifs/navbar.gif" usemap="#web2-map" border="0">
<map name="web2-map">
<AREA SHAPE=RECT COORDS="0,0,60,63" HREF="web2/index.htm">
<AREA SHAPE=RECT COORDS="61,0,118,63" HREF="web2/wdesign/index.htm">
<AREA SHAPE=RECT COORDS="120,0,198,63" HREF="web2/xhtml/index.htm">
<AREA SHAPE=RECT COORDS="200,0,252,63" HREF="web2/audio/index.htm">
<AREA SHAPE=RECT COORDS="253,0,328,63" HREF="web2/css/index.htm">
<AREA SHAPE=RECT COORDS="329,0,408,63" HREF="web2/action/index.htm">
<AREA SHAPE=RECT COORDS="409,0,515,71" HREF="web2/infoarch/index.htm">
</map>
</td></tr>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Oracle PL/SQL CD Bookshelf</b>, version 1.0
<TD>
<IMG SRC="oracle/gifs/navbar.gif" USEMAP="#map6" BORDER=0>
<MAP NAME="map6">
<AREA SHAPE="RECT" COORDS="0,0,55,100" HREF="oracle/index.htm" ALT="Library Home">
<AREA SHAPE="RECT" COORDS="60,0,120,100" HREF="oracle/prog2/index.htm" ALT="Oracle PL/SQL Programming, 2nd. Ed.">
<AREA SHAPE="RECT" COORDS="125,0,225,100" HREF="oracle/guide8i/index.htm" ALT="Guide to Oracle8i Features">
<AREA SHAPE="RECT" COORDS="230,0,275,100" HREF="oracle/bipack/index.htm" ALT="Oracle Built-in Packages">
<AREA SHAPE="RECT" COORDS="280,0,350,100" HREF="oracle/advprog/index.htm" ALT="Advanced PL/SQL Programming with Packages">
<AREA SHAPE="RECT" COORDS="355,0,450,100" HREF="oracle/webapp/index.htm" ALT="Oracle Web Applications">
<AREA SHAPE="RECT" COORDS="455,0,525,100" HREF="oracle/langpkt/index.htm" ALT="Oracle PL/SQL Language Pocket Reference">
<AREA SHAPE="RECT" COORDS="530,0,590,100" HREF="oracle/bipkt/index.htm" ALT="Oracle PL/SQL Built-ins Pocket Reference">
</MAP>
</td></tr>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Linux Web server CD Bookshelf</b>, version 1.0
<TD>
<img src="linux/gifs/navbar.gif" usemap="#Map7" border="0">
<map name="Map7">
<area shape="rect" coords="1,1,83,102" href="linux/index.htm">
<area shape="rect" coords="89,1,164,98" href="linux/lnut/index.htm">
<area shape="rect" coords="172,2,252,105" href="linux/run/index.htm">
<area shape="rect" coords="257,1,359,100" href="linux/apache/index.htm">
<area shape="rect" coords="364,2,444,132" href="linux/sql/index.htm">
<area shape="rect" coords="452,1,547,126" href="linux/dbi/index.htm">
<area shape="rect" coords="553,4,658,100" href="linux/cgi/index.htm"></map>
</td></tr>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Linux Web server CD Bookshelf</b>, version 2.0
<TD>
<img src="weblinux2/gifs/navbar.gif" usemap="#weblinux2" border="0" alt="The Linux Web Server CD Bookshelf navigation">
<map name="weblinux2">
<area shape="rect" coords="0,0,85,92" href="weblinux2/index.htm">
<area shape="rect" coords="89,1,204,113" href="weblinux2/apache/index.htm">
<area shape="rect" coords="208,-1,296,136" href="weblinux2/php/index.htm">
<area shape="rect" coords="301,-1,403,132" href="weblinux2/modperl/index.htm">
<area shape="rect" coords="406,3,503,115" href="weblinux2/mysql/index.htm">
<area shape="rect" coords="507,2,596,142" href="weblinux2/lian/index.htm">
<area shape="rect" coords="600,1,690,127" href="weblinux2/rlinux/index.htm">
</map>
</td></tr>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The Web Programming CD Bookshelf</b>, version 1.0
<TD>
<img src="webprog/gifs/navbar.gif" usemap="#webprog-map" border="0">
<map name="webprog-map">
<area shape="rect" coords="1,1,79,93" href="webprog/index.htm">
<area shape="rect" coords="82,2,168,97" href="webprog/php/index.htm">
<area shape="rect" coords="171,1,279,101" href="webprog/webdb/index.htm">
<area shape="rect" coords="282,3,372,100" href="webprog/webnut/index.htm">
<area shape="rect" coords="377,2,452,99" href="webprog/pcook/index.htm">
<area shape="rect" coords="456,2,562,107" href="webprog/jscript/index.htm">
<area shape="rect" coords="691,3,787,94" href="webprog/DHTML_javascript/index.html">
<area shape="rect" coords="570,5,683,87" href="webprog/dhtml/index.htm">
</map>
</td></tr>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>The XML CD Bookshelf</b>, version 1.0
<TD>
<img src="xml/gifs/navbar.gif" usemap="#xml-map" border="0">
<map name="xml-map">
<area shape="rect" coords="0,0,85,93" href="xml/index.htm">
<area shape="rect" coords="85,0,180,98" href="xml/sax2/index.htm">
<area shape="rect" coords="182,-1,261,100" href="xml/xmlnut/index.htm">
<area shape="rect" coords="263,1,384,96" href="xml/jxml/index.htm">
<area shape="rect" coords="386,1,463,100" href="xml/jxslt/index.htm">
<area shape="rect" coords="466,1,533,112" href="xml/xslt/index.htm">
<area shape="rect" coords="535,-1,610,108" href="xml/schema/index.htm">
<area shape="rect" coords="613,1,696,121" href="xml/pxml/index.htm">
</map>
</td></tr>
<TR>
<TD VALIGN=CENTER>
<FONT FACE="Arial,Helvetica,*"><B>Other Books</b>
<TD>
<a href="samba/index.html"><img src=samba/samba.s.gif width=72 hight=95 border=0></a> |
<a href="apache_mod/index.html"><img src=apache_mod/images/693_big.gif width=72 hight=95 border=0></a> |
<a href="dbnlinux/index.html"><img src=dbnlinux/banner.gif height=95 border=0></a> |
<a href="linuxdd/index.html"><img src=linuxdd/gifs/banner.gif height=95 border=0></a> |
<a href="linuxna2/index.html"><img src=linuxna2/gifs/banner.gif height=95 border=0></a> |
<a href="other/LRH/index.html"><img src=other/LRH/FILES/redhat3_xs.gif height=95 border=0></a> |
<a href="other/Sendmail_3rd/index.html"><img src="other/Sendmail_3rd/FILES/sendmail3_xs.gif" height=95 border=0></a> |
<a href="other/apache3rd/index.html"><img src="other/apache3rd/apache3_xs.gif" height=95 border=0></a> |
<a href="other/cvs/index.html"><img src="other/cvs/images/0596004591/cvs_xs.gif" height=95 border=0></a> |
<a href="other/ejb3rd/index.html"><img src="other/ejb3rd/entjbeans3_xs.gif" height=95 border=0></a> |
<a href="other/puis3rd/index.html"><img src="other/puis3rd/FILES/puis3_xs.gif" height=95 border=0></a> |
<a href="other/python/index.html"><img src="other/python/FILES/pythonian_xs.gif" height=95 border=0></a> |
<a href="other/python2/index.html"><img src="other/python2/TOC_files/image001.gif" height=95 border=0></a> |
<a href="other/swing/index.html"><img src="other/swing/FILES/jswing2_xs.gif" height=95 border=0></a>
</td></tr>
</TABLE>
<br>
<br>
<br>
</center>
</td><td style="vertical-align: top; text-align: right; width: 200px;">
<br><br><br><br><br><br>
<script type="text/javascript"><!--
google_ad_client = "pub-1271376699634376";
/* 160x600, o-rightfixed */
google_ad_slot = "7334564186";
google_ad_width = 160;
google_ad_height = 600;
//-->
</script>
<script type="text/javascript"
src="../../pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
</td></tr></table>
<br>
<center>
<br>
<script type="text/javascript"><!--
google_ad_client = "pub-1271376699634376";
/* 728x90, ds-footer */
google_ad_slot = "3888117136";
google_ad_width = 728;
google_ad_height = 90;
//-->
</script>
<script type="text/javascript"
src="../../pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
</center>
<br>
<hr size=1>
<!-- SpyLOG -->
<script src="../../tools.spylog.ru/counter_cv.js" id="spylog_code" type="text/javascript" counter="1028713" part="docs" track_links="ext" page_level="0">
</script>
<!--/ SpyLOG -->
<!--bigmir)net TOP 100-->
<script type="text/javascript" language="javascript"><!--
function BM_Draw(oBM_STAT){
document.write(\'<table cellpadding="0" cellspacing="0" border="0" style="display:inline;margin-right:4px;"><tr><td><div style="margin:0px;padding:0px;font-size:1px;width:88px;"><div style="background:url(\\\'../../i.bigmir.net/cnt/samples/diagonal/b59_top.gif\\\') no-repeat bottom;"> </div><div style="font:10px Tahoma;background:url(\\\'../../i.bigmir.net/cnt/samples/diagonal/b59_center.gif\\\');"><div style="text-align:center;"><a href="http://www.bigmir.net/" target="_blank" style="color:#0000ab;text-decoration:none;font:10px Tahoma;">bigmir<span style="color:#ff0000;">)</span>net</a></div><div style="margin-top:3px;padding: 0px 6px 0px 6px;color:#003596;"><div style="float:left;font:10px Tahoma;">\'+oBM_STAT.hosts+\'</div><div style="float:right;font:10px Tahoma;">\'+oBM_STAT.hits+\'</div></div><br clear="all"/></div><div style="background:url(\\\'http://i.bigmir.net/cnt/samples/diagonal/b59_bottom.gif\\\') no-repeat top;"> </div></div></td></tr></table>\');
}
//-->
</script>
<script type="text/javascript" language="javascript"><!--
bmN=navigator,bmD=document,bmD.cookie=\'b=b\',i=0,bs=[],bm={o:1,v:126595,s:126595,t:0,c:bmD.cookie?1:0,n:Math.round((Math.random()* 1000000)),w:0};
for(var f=self;f!=f.parent;f=f.parent)bm.w++;
try{if(bmN.plugins&&bmN.mimeTypes.length&&(x=bmN.plugins[\'Shockwave Flash\']))bm.m=parseInt(x.description.replace(/([a-zA-Z]|s)+/,\'\'));
else for(var f=3;f<20;f++)if(eval(\'new ActiveXObject("ShockwaveFlash.ShockwaveFlash.\'+f+\'")\'))bm.m=f}catch(e){;}
try{bm.y=bmN.javaEnabled()?1:0}catch(e){;}
try{bmS=screen;bm.v^=bm.d=bmS.colorDepth||bmS.pixelDepth;bm.v^=bm.r=bmS.width}catch(e){;}
r=bmD.referrer.slice(7);if(r&&r.split(\'http://docstore.mik.ua/\')[0]!=window.location.host){bm.f=escape(r);bm.v^=r.length}
bm.v^=window.location.href.length;for(var x in bm) if(/^[ovstcnwmydrf]$/.test(x)) bs[i++]=x+bm[x];
bmD.write(\'<sc\'+\'ript type="text/javascript" language="javascript" src="http://c.bigmir.net/?\'+bs.join(\'&\')+\'"></sc\'+\'ript>\');
//-->
</script>
<!--bigmir)net TOP 100-->
<!--begin of Rambler\'s Top100 code -->
<script type="text/javascript" language="javascript">
document.write(\'<a href="http://top100.rambler.ru/top/"><img src="http://counter.rambler.ru/top100.cnt?692798" alt="" width=1 height=1 border=0></a>\');
</script>
<!--end of Top100 code-->
<!--begin of Top100 logo-->
<script type="text/javascript" language="javascript">
document.write(\'<a href="http://top100.rambler.ru/top100/"><img src="http://top100-images.rambler.ru/top100/w1.gif" alt="Ramblers Top100" width=88 height=31 border=0></a>\');
</script>
<!--end of Top100 logo -->
<!-- hit.ua -->
<script language="javascript" type="text/javascript"><!--
document.write("<a href=\'http://hit.ua/?x=3601\' target=\'_blank\'>");
Cd=document;Cr="&"+Math.random();Cp="&s=1";
Cd.cookie="b=b";if(Cd.cookie)Cp+="&c=1";
Cp+="&t="+(new Date()).getTimezoneOffset();
if(self!=top)Cp+="&f=1";
//--></script>
<script language="javascript1.1" type="text/javascript"><!--
if(navigator.javaEnabled())Cp+="&j=1";
//--></script>
<script language="javascript1.2" type="text/javascript"><!--
if(typeof(screen)!=\'undefined\')Cp+="&w="+screen.width+"&h="+
screen.height+"&d="+(screen.colorDepth?screen.colorDepth:screen.pixelDepth);
//--></script>
<script language="javascript" type="text/javascript"><!--
Cd.write("<img src=\'http://c.hit.ua/hit?i=3601&g=0&x=1"+Cp+Cr+
"&r="+escape(Cd.referrer)+"&u="+escape(window.location.href)+
"\' border=\'0\' width=\'88\' height=\'31\' "+
"alt=\'hit.ua: сейчас на сайте, посетителей и просмотров за сегодня\' title=\'hit.ua: сейчас на сайте, посетителей и просмотров за сегодня\'/>");
document.write(\'</a>\');
//--></script>
<!-- / hit.ua -->
<script language="javascript">//<!--
mtI="012408140822";mtG="45";mtT="4";mtS=\'http://012408140822.c.mystat-in.net/?\';
mtD=document;mtN=navigator.appName;mtR=escape(mtD.referrer);
mtW="";mtC="";mtV="0";mtJ="1";
//--></script><script language="javascript1.1">//<!--
mtV="1";mtJ = (navigator.javaEnabled()?"1":"0");
//--></script><script language="javascript1.2">//<!--
mtE=screen;mtW=mtE.width;mtN!="Netscape"?mtC=mtE.colorDepth:mtC=mtE.pixelDepth;mtV="2";
//--></script><script language="javascript1.3">//<!--
mtV="3";
//--></script><script language="javascript">//<!--
mtUrl="";mtUrl+="\\""+mtS+"i"+mtI+"&t"+mtT+"&g"+mtG+"&w"+mtW+"&c"+mtC+"&r"+mtR+"&v"+mtV+"&j"+mtJ+"\\"";
mtUrl="<a href=http://mytop-in.net/ target=_blank><img src="+mtUrl+"width=88 height=31 border=0 alt=\\"Rated by MyTOP\\"></a>";
mtD.write(mtUrl);
//--></script>
<!--Rating@Mail.ru COUNTEr--><script language="JavaScript" type="text/javascript"><!--
d=document;var a=\'\';a+=\';r=\'+escape(d.referrer)
js=10//--></script><script language="JavaScript1.1" type="text/javascript"><!--
a+=\';j=\'+navigator.javaEnabled()
js=11//--></script><script language="JavaScript1.2" type="text/javascript"><!--
s=screen;a+=\';s=\'+s.width+\'*\'+s.height
a+=\';d=\'+(s.colorDepth?s.colorDepth:s.pixelDepth)
js=12//--></script><script language="JavaScript1.3" type="text/javascript"><!--
js=13//--></script><script language="JavaScript" type="text/javascript"><!--
d.write(\'<a href="http://top.mail.ru/jump?from=1374183"\'+
\' target=_top><img src="http://d7.cf.b4.a1.top.list.ru/counter\'+
\'?id=1374183;t=48;js=\'+js+a+\';rand=\'+Math.random()+
\'" alt="Рейтинг@Mail.ru"\'+\' border=0 height=31 width=88/><\\/a>\')
if(11<js)d.write(\'<\'+\'!-- \')//--></script>
<script language="JavaScript" type="text/javascript"><!--
if(11<js)d.write(\'--\'+\'>\')//--></script><!--/COUNTER-->
<script type="text/javascript">
<!--
Nnv=navigator;Nna=Nnv.appName;Nd=document;Nd.cookie="b=b";Nc=0;if(Nd.cookie)Nc=1;
Nn=(Nna.substring(0,2)=="Mi")?0:1;Ns=screen;Npx=(Nn==0)?Ns.colorDepth:Ns.pixelDepth;
str=\'<img src="http://c.uarating.com/199;\'+Ns.width+\'x\'+Ns.height+\';\'+Npx+\';\'+Nc+\';\';
str=str+escape(Nd.referrer)+\';\'+Math.random()+\'" width="88" height="31" border="0">\';
document.write(\'<a href="http://www.uarating.com/" alt="uaRating" target="_blank">\'+str+\'<\\/a>\');
// -->
</script>
<script type="text/javascript" src="../../apis.google.com/js/plusone.js"></script></BODY>
</html>
';
my $regex = qr/<center><script type="text\/javascript">/p;
if ( $str =~ /$regex/ ) {
print "Whole match is ${^MATCH} and its start/end positions can be obtained via \$-[0] and \$+[0]\n";
# print "Capture Group 1 is $1 and its start/end positions can be obtained via \$-[1] and \$+[1]\n";
# print "Capture Group 2 is $2 ... and so on\n";
}
# ${^POSTMATCH} and ${^PREMATCH} are also available with the use of '/p'
# Named capture groups can be called via $+{name}
Please keep in mind that these code samples are automatically generated and are not guaranteed to work. If you find any syntax errors, feel free to submit a bug report. For a full regex reference for Perl, please visit: http://perldoc.perl.org/perlre.html