<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	>

<channel>
	<title>WwW.TarikZengin.CoM &#187; Perl</title>
	<atom:link href="http://tarikzengin.com/tag/perl/feed/" rel="self" type="application/rss+xml" />
	<link>http://tarikzengin.com</link>
	<description>Japonya&#039;dan bildiriyor....</description>
	<lastBuildDate>Sat, 01 Oct 2011 06:25:56 +0000</lastBuildDate>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.3.1</generator>
		<item>
		<title>Amele Programming Reloaded</title>
		<link>http://tarikzengin.com/amele-programming-reloaded/</link>
		<comments>http://tarikzengin.com/amele-programming-reloaded/#comments</comments>
		<pubDate>Sun, 30 Nov 2008 06:26:08 +0000</pubDate>
		<dc:creator>Aydin Tarik Zengin</dc:creator>
				<category><![CDATA[Gentoo]]></category>
		<category><![CDATA[Linux]]></category>
		<category><![CDATA[AR5006EG]]></category>
		<category><![CDATA[Atheros]]></category>
		<category><![CDATA[GNU/Linux]]></category>
		<category><![CDATA[Madwifi-ng]]></category>
		<category><![CDATA[Mechanize]]></category>
		<category><![CDATA[Ndiswrapper]]></category>
		<category><![CDATA[Perl]]></category>

		<guid isPermaLink="false">http://tarikzengin.wordpress.com/?p=227</guid>
		<description><![CDATA[<a href="http://tarikzengin.com/amele-programming-reloaded/" title="Amele Programming Reloaded"></a>Evde kullandigim internet baglantisi bana biraz acayip geliyor. DHCP ile IP aldiktan sonra bir de ISP nin login sayfasina girip kullanici adi ve sifre ile login olmak gerekiyor. Bu tip baglantiya ne isim veriliyor hic bilmiyorum. Sorun su ki boot &#8230;<p class="read-more"><a href="http://tarikzengin.com/amele-programming-reloaded/">Read more &#187;</a></p>]]></description>
			<content:encoded><![CDATA[<a href="http://tarikzengin.com/amele-programming-reloaded/" title="Amele Programming Reloaded"></a><p>Evde kullandigim internet baglantisi bana biraz acayip geliyor. DHCP ile IP aldiktan sonra bir de ISP nin login sayfasina girip kullanici adi ve sifre ile login olmak gerekiyor. Bu tip baglantiya ne isim veriliyor hic bilmiyorum. Sorun su ki boot esnasinda DHCP sorgusu yapip IP almama ragmen firefox ile login sayfasina girip sifre girene kadar internete ulasamiyor olmak sinir bozucu. Ornegin NTP ile saat guncellemesi yapamiyorum bu durumda. Ya da en azindan gatget tarzi ufak uygulamalar desktop acildigi anda nete ulasamiyor ve sorunlarla karsilasiyorum.  Login sayfasinin yapisi oldukca basit. Kullanici adi ve sifrenin girildigi basit bir form submit ediliyor. Bir kac sene once Sesli&#8217;de kullandigim Mechanize ile yine ayni yapiyi kullanarak ufak bir script hazirladim. Yine Perl ile. Zaten neredeyse Sesli&#8217;deki betigin aynisini kullandim denebilir.Perl ile parsing yapmayi bilsem bash script&#8217;e de hic gerek kalmayacak ama su anda onu ogrenmeye ne vaktim ne de hevesim var. Yine yalnizca kendi isimi gorecek, benden baska kimsenin ne ihtiyac duyacagi ne de deneyebilecegi birsey cikti ortaya.<span id="more-227"></span></p>

<div class="wp_syntax"><div class="code"><pre class="perl" style="font-family:monospace;"><span style="color: #666666; font-style: italic;">#!/usr/bin/perl</span>
<span style="color: #000000; font-weight: bold;">use</span> strict<span style="color: #339933;">;</span>
<span style="color: #000000; font-weight: bold;">use</span> WWW<span style="color: #339933;">::</span><span style="color: #006600;">Mechanize</span><span style="color: #339933;">;</span>
<span style="color: #000000; font-weight: bold;">use</span> HTTP<span style="color: #339933;">::</span><span style="color: #006600;">Cookies</span><span style="color: #339933;">;</span>
&nbsp;
<span style="color: #b1b100;">my</span> <span style="color: #0000ff;">$username</span> <span style="color: #339933;">=</span> <span style="color: #0000ff;">$ARGV</span><span style="color: #009900;">&#91;</span><span style="color: #cc66cc;">0</span><span style="color: #009900;">&#93;</span><span style="color: #339933;">;</span>
<span style="color: #b1b100;">my</span> <span style="color: #0000ff;">$password</span> <span style="color: #339933;">=</span> <span style="color: #0000ff;">$ARGV</span><span style="color: #009900;">&#91;</span><span style="color: #cc66cc;">1</span><span style="color: #009900;">&#93;</span><span style="color: #339933;">;</span>
<span style="color: #b1b100;">my</span> <span style="color: #0000ff;">$adres</span> <span style="color: #339933;">=</span> <span style="color: #ff0000;">&quot;http://login.iam.ne.jp&quot;</span><span style="color: #339933;">;</span>
&nbsp;
<span style="color: #666666; font-style: italic;">#çıktının yazılacağı dosya</span>
<span style="color: #b1b100;">my</span> <span style="color: #0000ff;">$linkfile</span> <span style="color: #339933;">=</span> <span style="color: #ff0000;">&quot;out.html&quot;</span><span style="color: #339933;">;</span>
&nbsp;
<span style="color: #b1b100;">my</span> <span style="color: #0000ff;">$mech</span> <span style="color: #339933;">=</span> WWW<span style="color: #339933;">::</span><span style="color: #006600;">Mechanize</span><span style="color: #339933;">-</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span>new<span style="color: #009900;">&#40;</span><span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span>
<span style="color: #0000ff;">$mech</span><span style="color: #339933;">-</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span>cookie_jar<span style="color: #009900;">&#40;</span>HTTP<span style="color: #339933;">::</span><span style="color: #006600;">Cookies</span><span style="color: #339933;">-</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span>new<span style="color: #009900;">&#40;</span><span style="color: #009900;">&#41;</span><span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span>
<span style="color: #0000ff;">$mech</span><span style="color: #339933;">-</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span>get<span style="color: #009900;">&#40;</span><span style="color: #0000ff;">$adres</span><span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span>
<span style="color: #0000ff;">$mech</span><span style="color: #339933;">-</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span>form_name<span style="color: #009900;">&#40;</span><span style="color: #ff0000;">'LoginUser'</span><span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span>    <span style="color: #666666; font-style: italic;">#form adı LoginUser</span>
<span style="color: #0000ff;">$mech</span><span style="color: #339933;">-</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span>field<span style="color: #009900;">&#40;</span>username <span style="color: #339933;">=</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span> <span style="color: #0000ff;">$username</span><span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span>    <span style="color: #666666; font-style: italic;">#kullanıcı adının yazılacağı değişken username</span>
<span style="color: #0000ff;">$mech</span><span style="color: #339933;">-</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span>field<span style="color: #009900;">&#40;</span>passwd <span style="color: #339933;">=</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span> <span style="color: #0000ff;">$password</span><span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span>    <span style="color: #666666; font-style: italic;">#şifrenin yazılacağı değişken passwd</span>
<span style="color: #0000ff;">$mech</span><span style="color: #339933;">-</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span>click<span style="color: #009900;">&#40;</span><span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span>
&nbsp;
<span style="color: #b1b100;">my</span> <span style="color: #0000ff;">$link_page</span> <span style="color: #339933;">=</span> <span style="color: #0000ff;">$mech</span><span style="color: #339933;">-</span><span style="color: #0000ff;">&amp;gt</span><span style="color: #339933;">;</span>content<span style="color: #009900;">&#40;</span><span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span>
<span style="color: #000066;">open</span><span style="color: #009900;">&#40;</span>OUTFILE<span style="color: #339933;">,</span> <span style="color: #ff0000;">&quot;&amp;gt;$linkfile&quot;</span><span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span>
<span style="color: #000066;">print</span> OUTFILE <span style="color: #ff0000;">&quot;$link_page&quot;</span><span style="color: #339933;">;</span>
<span style="color: #000066;">close</span><span style="color: #009900;">&#40;</span>OUTFILE<span style="color: #009900;">&#41;</span><span style="color: #339933;">;</span></pre></div></div>


<div class="wp_syntax"><div class="code"><pre class="bash" style="font-family:monospace;"><span style="color: #666666; font-style: italic;">#!/bin/bash</span>
<span style="color: #666666; font-style: italic;">#Degiskenleri tanimla</span>
<span style="color: #007800;">USER</span>=kullanici-adim-buraya
<span style="color: #007800;">PASS</span>=sifrem-de-buraya
<span style="color: #007800;">LINK</span>=link.html
<span style="color: #007800;">OUT</span>=out.html
<span style="color: #007800;">LOG</span>=log
<span style="color: #007800;">DIR</span>=<span style="color: #000000; font-weight: bold;">/</span>home<span style="color: #000000; font-weight: bold;">/</span>tarik<span style="color: #000000; font-weight: bold;">/</span><span style="color: #c20cb9; font-weight: bold;">login</span>
&nbsp;
<span style="color: #7a0874; font-weight: bold;">cd</span> <span style="color: #007800;">$DIR</span>
&nbsp;
.<span style="color: #000000; font-weight: bold;">/</span>gir <span style="color: #007800;">$USER</span> <span style="color: #007800;">$PASS</span>
&nbsp;
<span style="color: #7a0874; font-weight: bold;">export</span> <span style="color: #007800;">logintime</span>=<span style="color: #000000; font-weight: bold;">`</span><span style="color: #c20cb9; font-weight: bold;">cat</span> <span style="color: #007800;">$OUT</span> <span style="color: #000000; font-weight: bold;">|</span> <span style="color: #c20cb9; font-weight: bold;">grep</span> <span style="color: #ff0000;">&quot;Login Time&quot;</span>  <span style="color: #000000; font-weight: bold;">|</span> <span style="color: #c20cb9; font-weight: bold;">awk</span> <span style="color: #ff0000;">'{print $5 &quot; &quot; $6 &quot; &quot;  $7 &quot; &quot;  $8 $9 $10}'</span> <span style="color: #000000; font-weight: bold;">|</span> <span style="color: #c20cb9; font-weight: bold;">cut</span> <span style="color: #660033;">-d</span> <span style="color: #ff0000;">'&amp;lt;'</span> -f1<span style="color: #000000; font-weight: bold;">`</span>
&nbsp;
<span style="color: #000000; font-weight: bold;">if</span> <span style="color: #7a0874; font-weight: bold;">test</span> <span style="color: #ff0000;">&quot;x<span style="color: #007800;">$logintime</span>&quot;</span> = x
<span style="color: #000000; font-weight: bold;">then</span>
<span style="color: #7a0874; font-weight: bold;">echo</span> <span style="color: #ff0000;">&quot;Connection Problem. User : <span style="color: #007800;">$USER</span> . &quot;</span>
<span style="color: #7a0874; font-weight: bold;">echo</span> <span style="color: #ff0000;">&quot;Check your settings!&quot;</span>
<span style="color: #7a0874; font-weight: bold;">export</span> <span style="color: #007800;">errordate</span>=<span style="color: #000000; font-weight: bold;">`</span><span style="color: #c20cb9; font-weight: bold;">date</span><span style="color: #000000; font-weight: bold;">`</span>
<span style="color: #7a0874; font-weight: bold;">echo</span> <span style="color: #ff0000;">&quot;Failed  : <span style="color: #007800;">$USER</span> <span style="color: #007800;">$errordate</span>&quot;</span> <span style="color: #000000; font-weight: bold;">&amp;</span>gt;<span style="color: #000000; font-weight: bold;">&amp;</span>gt; <span style="color: #007800;">$LOG</span>
<span style="color: #000000; font-weight: bold;">else</span>
<span style="color: #7a0874; font-weight: bold;">echo</span> <span style="color: #ff0000;">&quot;Connection Established&quot;</span>
<span style="color: #7a0874; font-weight: bold;">echo</span> <span style="color: #ff0000;">&quot;Login Time : <span style="color: #007800;">$logintime</span>&quot;</span>
<span style="color: #7a0874; font-weight: bold;">echo</span> <span style="color: #ff0000;">&quot;Success : <span style="color: #007800;">$USER</span> <span style="color: #007800;">$logintime</span>&quot;</span> <span style="color: #000000; font-weight: bold;">&amp;</span>gt;<span style="color: #000000; font-weight: bold;">&amp;</span>gt; <span style="color: #007800;">$LOG</span>
<span style="color: #000000; font-weight: bold;">fi</span></pre></div></div>

<p>Ilk betigi &#8220;gir&#8221; ismiyle kaydedip ikinci betik icerisinden cagiriyorum. Baslikta da soyledigim gibi &#8220;Amele&#8221; programlama <img src='http://tarikzengin.com/wp-includes/images/smilies/icon_smile.gif' alt=':)' class='wp-smiley colorbox-227' />   Login esnasinda calismasi icin de .bashrc&#8217;ye ekledim betigin yolunu. Aslinda en guzeli bir init script yazmak. Hemen net.eth0 ardindan kosacak bir init scripti daha mantikli. Bu yolla NTP update yapamam haliyle. O kismi hala sorunlu. Ama en azindan masaustu acildiginda internet calisir durumda oluyor. Bu da bir asama.  Simdi bir problem daha kaldi. Evdeyken DHCP kullaniyorum. Ardindan yukaridaki betikle login olmam gerekiyor. Labda statik IP kullaniyorum. Okulun diger kisimlarinda Wireless kullaniyorum, yine DHCP. Bunlarin tumu icin ayri profiller olusturmam gerekiyor /etc/conf.d/net dosyasinda. Su anda gozume biraz karisik gozukuyor. Bu betigin de yalnizca evden baglanirken calisiyor olmasini istiyorum. Su anda hic icimden gelmiyor <img src='http://tarikzengin.com/wp-includes/images/smilies/icon_sad.gif' alt=':(' class='wp-smiley colorbox-227' />  Belki yakinda duzgun bir ayar yaparim.</p>
]]></content:encoded>
			<wfw:commentRss>http://tarikzengin.com/amele-programming-reloaded/feed/</wfw:commentRss>
		<slash:comments>1</slash:comments>
		</item>
		<item>
		<title>Sesli v2</title>
		<link>http://tarikzengin.com/sesli-v2/</link>
		<comments>http://tarikzengin.com/sesli-v2/#comments</comments>
		<pubDate>Wed, 15 Aug 2007 14:22:25 +0000</pubDate>
		<dc:creator>Aydin Tarik Zengin</dc:creator>
				<category><![CDATA[Linux]]></category>
		<category><![CDATA[Projeler]]></category>
		<category><![CDATA[GNU/Linux]]></category>
		<category><![CDATA[Lapis]]></category>
		<category><![CDATA[Perl]]></category>
		<category><![CDATA[Python]]></category>
		<category><![CDATA[Sesli]]></category>
		<category><![CDATA[Zemberek]]></category>

		<guid isPermaLink="false">http://tarikzengin.wordpress.com/2007/08/15/sesli-v2/</guid>
		<description><![CDATA[<a href="http://tarikzengin.com/sesli-v2/" title="Sesli v2"></a>1 sene önce öylesine aklıma gelip giriştiğim bir proje &#8220;Sesli&#8221;. 2 gecede ortaya çıktı ve sonradan da birkaç eklemeyle son halini aldı. Üstünden 1 yıl geçti, hiç ilgilenemedim. Bu süre zarfında seslisozluk tasarımı değiştiği için proje çalışmaz duruma gelmişti. Geçenlerde &#8230;<p class="read-more"><a href="http://tarikzengin.com/sesli-v2/">Read more &#187;</a></p>]]></description>
			<content:encoded><![CDATA[<a href="http://tarikzengin.com/sesli-v2/" title="Sesli v2"></a><p>1 sene önce öylesine aklıma gelip giriştiğim bir proje &#8220;Sesli&#8221;. 2 gecede ortaya çıktı ve sonradan da birkaç eklemeyle son halini aldı.</p>
<p>Üstünden 1 yıl geçti, hiç ilgilenemedim. Bu süre zarfında seslisozluk tasarımı değiştiği için proje çalışmaz duruma gelmişti. Geçenlerde tekrar aklıma takılınca ayağa kaldırasım geldi <img src='http://tarikzengin.com/wp-includes/images/smilies/icon_smile.gif' alt=':)' class='wp-smiley colorbox-124' /> </p>
<p>Fakat bu kez yeni bir şeyler öğrenmek adına, daha önce Perl ve Bash Script kullandığım projeyi Python&#8217;a taşıma kararı aldım. Planım öncelikle çatıyı oluşturup ardından pyQT, pyGTK ya da wxPython kullanarak projeye kişilik kazandırmak.</p>
<p>Geçen yıl Erkan Kaplan&#8217;ın sağladığı, Lapis Forum&#8217;la beraber aynı sunucuda bulundurduğu  <a title="Sesli" href="http://sesli.linux-sevenler.org/">şu sayfa</a>da yayınlamıştım. Şu an sayfadaki versiyonlar işlevsiz olsa da incelemek isteyenlere açık.</p>
<p>Python konusunda henüz hiç bilgim olmaması nedeniyle ilginç bir tecrübe olacak. İlk izleninim olarak okunaklı bir syntax&#8217;a sahip olduğunu söyleyebilirim. Bu izlenimimden dolayı pişman olmayacağımı umuyorum. Python bilen arkadaşlara da selam ederim. Başınızı ağrıtacağım.</p>
<p>Şu an için Zemberek ile kelime kökü bulma işlemlerini dahil etmeyeceğim. Bu konuyu <a title="Serkan Kaba" href="http://serkank.wordpress.com/">Serkan</a> ile konuşup program içine gömüp gömemeyeceğimi sormam gerek.</p>
<p>Çok fazla boş vaktim olmadığını ve hiç Python bilmediğimi de göz önünde bulundurursam  bu kez 2 gecede bitmeyecek <img src='http://tarikzengin.com/wp-includes/images/smilies/icon_smile.gif' alt=':)' class='wp-smiley colorbox-124' />   Zaten ne zaman vaktim olmasa, yoğun olsam bu tür şeyler yapasım gelir. Huy işte, çıkmıyor.<br />
Beta tester&#8217;ım hazır olsun. O kendini biliyor <img src='http://tarikzengin.com/wp-includes/images/smilies/icon_biggrin.gif' alt=':D' class='wp-smiley colorbox-124' /> </p>
]]></content:encoded>
			<wfw:commentRss>http://tarikzengin.com/sesli-v2/feed/</wfw:commentRss>
		<slash:comments>2</slash:comments>
		</item>
	</channel>
</rss>

