Mamat Zone

Download Unixmanga Naruto dengan Perl & Wget

mamat — Tue, 14 Feb 2012 20:20:47 +0700

Wah berhubung tiga bulan jadwal padet banget, jadi jarang baca Naruto. Kalau browsing satu-satu kayaknya kurang sip kalau bisa didownload nanti transfer ke HP buat baca-baca di jalan, kebetulan lagi ada bandwidth nganggur kalau malam dan iseng modifikasi script parse html menggunakan Perl dari milis @Wikusama punya @Mas Dodik, akhirnya bisa juga.

Berikut code yang sudah dimodifikasi agar bisa download Naruto di Unixmanga.

#!/usr/bin/perl -w

use File::Basename;
$chapterStart = $ARGV[0];
$chapterStop = $ARGV[1];

while($chapterStart<=$chapterStop){

$folder = $chapterStart;
print $folder;

$url = "http://unixmanga.com/onlinereading/Naruto/Naruto_c$folder.html";
`mkdir $folder`;

$url =~ s' '%20'g;

$url = $url unless $url =~ /http/;
`wget -t 5 -w 2 -a wget.log -O index.html $url`;

open (IND,"<","index.html");
$page = 1;
while () {
if (/image=Naruto/) {
$gambar = $_;
chomp $gambar;
$gambar =~ s/.*HREF="(.*?)".*/$1/g;
$gambar =~ s' '%20'g;
print "List Gambar : $gambar\n";

`wget -t 5 -w 2 -a wget.log -O temp.html $gambar`;

open(TIND, "<", "temp.html");
while(){
if(/Adsload.src = "/){
$gambarx= $_;
chomp $gambarx;
$gambarx=~ s/.*Adsload.src = "(.*?)".*/$1/g;
$gambarx =~ s' '%20'g;

print "--> Get Gambar : $gambarx\n";
print "---->wget -t 5 -w 2 -a wget.log -O $folder/$page.jpg $gambarx\n\n";
`wget -t 5 -w 2 -a wget.log -O $folder/$page.jpg $gambarx`;

}
}
$page++;
}
}

$chapterStart++;
}

Jika anda menggunakan Windows install terlebih dahulu, Perl dan Wget for windows taruh di system32 agar bisa langsung dieksekusi tanpa harus menambahkan path di enviroment.

Cara penggunaan, dengan perintah download manga Naruto dari chapter 550 sampai dengan 573

E:\project\explore\manga> naruto.pl 550 573

Good Luck

Oracle Data Pump in Oracle Database 10g (expdp and impdp)

mamat — Thu, 09 Feb 2012 06:59:56 +0700

Oracle Data Pump in Oracle Database 10g (expdp and impdp)

Oracle Data Pump is a newer, faster and more flexible alternative to the "exp" and "imp" utilities used in previous Oracle versions. In addition to basic import and export functionality data pump provides a PL/SQL API and support for external tables.

Getting Started

For the examples to work we must first unlock the SCOTT account and create a directory object it can access. The directory object is only a pointer to a physical directory, creating it does not actually create the physical directory on the file system.

CONN / AS SYSDBA
ALTER USER scott IDENTIFIED BY tiger ACCOUNT UNLOCK;

CREATE OR REPLACE DIRECTORY test_dir AS '/u01/app/oracle/oradata/';
GRANT READ, WRITE ON DIRECTORY test_dir TO scott;

Existing directories can be queried using the ALL_DIRECTORIES view.

Table Exports/Imports

The TABLES parameter is used to specify the tables that are to be exported. The following is an example of the table export and import syntax.

expdp scott/tiger@db10g tables=EMP,DEPT directory=TEST_DIR dumpfile=EMP_DEPT.dmp logfile=expdpEMP_DEPT.log

impdp scott/tiger@db10g tables=EMP,DEPT directory=TEST_DIR dumpfile=EMP_DEPT.dmp logfile=impdpEMP_DEPT.log

Schema Exports/Imports

The OWNER parameter of exp has been replaced by the SCHEMAS parameter which is used to specify the schemas to be exported. The following is an example of the schema export and import syntax.

expdp scott/tiger@db10g schemas=SCOTT directory=TEST_DIR dumpfile=SCOTT.dmp logfile=expdpSCOTT.log

impdp scott/tiger@db10g schemas=SCOTT directory=TEST_DIR dumpfile=SCOTT.dmp logfile=impdpSCOTT.log

Database Exports/Imports

The FULL parameter indicates that a complete database export is required. The following is an example of the full database export and import syntax.

expdp system/password@db10g full=Y directory=TEST_DIR dumpfile=DB10G.dmp logfile=expdpDB10G.log

impdp system/password@db10g full=Y directory=TEST_DIR dumpfile=DB10G.dmp logfile=impdpDB10G.log

Reference:
http://www.oracle-base.com/articles/10g/OracleDataPump10g.php

Memanggil ORA_HASH function dalam Trigger

mamat — Mon, 02 Jan 2012 11:42:52 +0700

Berikut ini adalah contoh memasukkan function ORA_HASH dalam trigger, keperluannya adalah ketika kita membuat atau mengupdate password otomatis akan merubah password yang dimasukkan menjadi hash.

CREATE OR REPLACE TRIGGER "TGR_HASH_PASSWORD"
BEFORE INSERT OR UPDATE ON T_LOGIN
FOR EACH ROW
DECLARE
NEW_TL_PASS VARCHAR2(64);
BEGIN
SELECT ORA_HASH(:NEW.TL_PASSWORD) INTO NEW_TL_PASS FROM DUAL;
:NEW.TL_PASSWORD := NEW_TL_PASS;
END;

CROSS Query/Join Query Multiple Database ON Oracle

mamat — Wed, 14 Dec 2011 02:57:24 +0700

Di ORACLE ada fitur dengan nama database link, memungkinkan kita untuk melakukan query dari database lain.

Untuk melakukannnya kita perlu membuat DATABASE LINK terlebih dahulu.

SQL> create database link DATABASELINKNAME
2 connect to USERNAMEDB identified by PASSWORD
3 using
4 '(DESCRIPTION=
5 (ADDRESS=
6 (PROTOCOL=TCP)
7 (HOST=192.168.10.10)
8 (PORT=1521))
9 (CONNECT_DATA=
10 (SID=DEV)))'
11 /

Database link created.

Contoh Query

select * from APPS.TB_UNIT@DATABASELINKNAME

select PA_NUMBER,PA_NUMBER_ENTRY,PA_DATE, z.TA_JML_AGRN
from APPS.IP_IFEP_PAHEADER@DATABASELINKNAME x
inner join IPORC.T3_ANGGARAN z on z.TA_NO_AGRN=x.PA_NUMBER_ENTRY

Build War menggunakan Ant

mamat — Thu, 24 Nov 2011 17:52:18 +0700

Build War dengan menggunakan Ant sangat dinamis, contoh pada kasus yang saya punya adalah dimana enviroment development kita akan secara otomatis melakukan build war dan langsung mendeploy web server(*kasus ini web server menggunakan tomcat).

Karena kita melakukan development menggunakan Eclipse, awalnya sangat susah jika melakukan Build War pada ant default. Akhirnya dengan mencotek configurasi dari Eclipse builder dan menambahkan lib Eclipse ke server, bisa jalan build War secara smooth. Alhamdulillah... hehe.

Agar build war dan deployment bisa dilakukan secara otomatis, command pada ant ditanam pada conjob diserver. Berikut ini command ant dengan script yang sudah saya buat:

Clean Class - ini akan membersihkan compailer yang lama (*.class)
ant clean

Create War - membuat War
ant create

Deploy War - untuk melakukan deploy ke web server(*tomcat), untuk web server configurasi autodeploy jika ada file baru yang masuk.
ant deploy

Berikut ini adalah detil script ant yang sudah dibuat:

location="/opt/eclipselib/1.4/javax.servlet.jsp.jar" />

location="WebRoot/WEB-INF/lib/commons-collections-2.1.jar" />
location="WebRoot/WEB-INF/lib/commons-fileupload.jar" />
location="WebRoot/WEB-INF/lib/commons-lang-2.0.jar" />
location="WebRoot/WEB-INF/lib/commons-logging-1.0.2.jar" />
location="WebRoot/WEB-INF/lib/commons-net-1.4.1.jar" />

location="WebRoot/WEB-INF/lib/jakarta-oro-2.0.8.jar" />
location="WebRoot/WEB-INF/lib/jasperreports-3.0.0.jar" />

location="WebRoot/WEB-INF/lib/commons-fileupload-1.2.1-javadoc.jar" />
location="WebRoot/WEB-INF/lib/commons-fileupload-1.2.1-sources.jar" />
location="WebRoot/WEB-INF/lib/commons-fileupload-1.2.1.jar" />
location="WebRoot/WEB-INF/lib/commons-io-1.3.2.jar" />
location="WebRoot/WEB-INF/lib/commons-lang-2.3.jar" />
location="WebRoot/WEB-INF/lib/commons-logging-1.0.4.jar" />
location="WebRoot/WEB-INF/lib/commons-pool-1.3.jar" />
location="WebRoot/WEB-INF/lib/commons-validator-1.3.0.jar" />

todir="WebRoot/WEB-INF/classes">

destdir="WebRoot/WEB-INF/classes" source="${source}"
target="${target}">

description="Build all projects which reference this project. Useful to propagate changes."
name="build-refprojects" />
description="copy Eclipse compiler jars to ant lib directory"
name="init-eclipse-compiler">

includes="org.eclipse.jdt.core_*.jar" />

includes="org.eclipse.jdt.core_*.jar" />

name="build-eclipse-compiler">
value="org.eclipse.jdt.core.JDTCompilerAdapter" />

update="true">

Eclipse - Tomcat There are no resources that can be added or removed from the server

mamat — Thu, 24 Nov 2011 04:59:13 +0700

Jika anda mengalami error seperti atas, click kanan pada project anda pilih Project Facets. Pilih Dynamic Web Module dan sesuaikan dengan Java Runtime anda. Misal Dynamic Web Module : 2.5, minimal Java harus 1.5.

Semoga bermanfaat.

Kebiasaan Orang Sukses

mamat — Sat, 19 Nov 2011 10:17:54 +0700

Kesuksesan adalah obsesi setiap insan di dunia ini. Dan apapun akan dilakukan untuk meraih sukses ini. Mungkin banyak yang masih bingung, bagaimana sih mencapai sukses itu ? Apakah harus selalu bekerja keras, pantang menyerah dan tidak mengenal lelah ?

Menurut David C. Clelland, seorang profesor di Amerika yang mendalami perjalanan orang?orang sukses, orang yang sukses adalah orang?orang yang tidak pernah berhenti mencoba, sekalipun awalnya mereka harus menemui kegagalan. Untuk lebih jelasnya, coba ikuti apa saja yang dilakukan oleh orang?orang sukses berikut ini. Siapa tahu anda bisa sukses seperti mereka.

- Orang sukses selalu percaya diri dan merasakan bahwa mereka berbuat sesuatu untuk dunia dengan niat ibadah.
Mereka memandang sebuah dunia yang besar ini dan ingin memainkan peranan penting di dalamnya. Mereka tetap bekerja sesuai ketrampilan mereka, sambil tetap menyadari bahwa ketrampilan ini memberi nilai lebih kepada ketrampilan lainnya. Mereka juga sadar, karya terbaik akan menghasilkan kompensasi bagi mereka.

- Orang sukses mau mengambil resiko dan berusaha mengatasinya.
Mereka berupaya untuk mencapai target, melakukan penghematan, membangun relasi dengan banyak orang. Serta gesit mencoba sesuatu yang baru untuk mengikuti perkembangan zaman, sepanjang jalan yang dilewati positip.

- Orang sukses mampu menikmati apa yang mereka kerjakan.
Mereka selalu melihat pekerjaan sebagai HOBY atau KESENANGAN. Mereka juga memilih pekerjaan yang dapat melecut semangat juang mereka. Karena orang sukses menyukai tantangan. Mereka sangat menikmati proses pencapaian kesuksesan mereka, dimanapun mereka berada.

- Orang sukses adalah orang yang tak pernah berhenti belajar.
Mereka sangat menyadari bahwa ilmu pengetahuan tidak pernah berakhir sekalipun kehidupan nyaris berakhir. Ilmu pengetahuan bisa didapat dari buku?buku pengetahuan, surat kabar, majalah, televisi, internet dan lainnya. Jangan khawatir, di jaman teknologi dewasa ini anda tidak akan kekurangan media untuk memperoleh ilmu pengetahuan. Ingat, dengan pengetahuan yang cukup, anda akan semakin percaya diri dan leluasa melangkah di dunia kerja.

- Orang sukses selalu berpandangan positif terhadap apa yang dapat mereka kerjakan.
Mereka mampu menyemangati diri sendiri untuk berhasil meraih sukses. Karena umumnya orang sukses punya cara tersendiri untuk memotivasi diri hingga mereka dapat terus berkarya. Hebatnya, mereka pun mampu menyemangati orang lain untuk mencapai sukses yang diinginkan.

-Orang sukses tidak pernah setengah?setengah dalam bekerja.
Mereka memiliki semangat yang membara dan kekuatan yang penuh untuk mencapai kesuksesan. Mereka pandai memfaatkan waktu dengan baik dalam kemampuan fisik dan mental untuk mencapai sukses.

Ref :
http://www.kaskus.us/showthread.php?t=11287047

Sup Kentang Iga

mamat — Tue, 25 Oct 2011 13:57:51 +0700

Foto: Syahroni/detikFood

Jakarta - Di kala cuaca tak bersahabat akhir-akhir ini. Sup iga yang lengkap ini bisa jadi solusi. Daging iga yang empuk dan sayuran yang komplet, bikin sup ini tambah enak. Apalagi saat disantap hangat-hangat.

Bahan:
1 liter air
500 g iga sapi berdaging, potong-potong
1 sdm margarin
100 g bawang Bombay, iris kasar
1 sdt merica bubuk
� sdt pala bubuk
1 sdt garam
250 g kentang kecil, kupas, potong dua
2 buah tomat, potong-potong
100 g wortel, potong-potong
1 batang daun bawang, iris kasar

Cara membuat:
Didihkan air, masukkan iga sapi, kecil api.
Masak iga sapi dengan api kecil hingga dagingnya empuk. Buang busa dan kotoran yang ada di permukaannya.
Lelehkan margarin, tumis bawang bombay hingga wangi.
Angkat, masukkan ke dalam rebusan iga.
Tambahkan merica, pala, garam, kentang, tomat dan wortel.
Masak hingga sayuran lunak.
Angkat, taburi daun bawang.
Sajikan hangat.
Untuk 6 orang

(dev/Odi)

Sumber : http://www.detikfood.com/read/2011/01/21/140541/1551681/368/resep-sup-sup-kentang-iga

Lirik Syi'ir Tanpo Waton + Artine

mamat — Sat, 13 Aug 2011 14:47:49 +0700

Lirik Syi\'ir Tanpo Waton + Artine
أَسْتَغْفِرُ اللهْ رَبَّ الْبَرَايَا * أَسْتَغْفِرُ اللهْ مِنَ الْخَطَايَا

رَبِّ زِدْنِي عِلْمًا نَافِعَا * وَوَفِّقْنِي عَمَلاً صَالِحَا

ياَ رَسُولَ اللهْ سَلاَمٌ عَلَيْكْ * يَا رَفِيْعَ الشَّانِ وَ الدَّرَجِ

عَطْفَةً يَّاجِيْرَةَ الْعَالَمِ * ( يَا أُهَيْلَ الْجُودِ وَالْكَرَمِ

Ngawiti ingsun nglaras syi�iran
Kelawan muji maring Pengeran
Kang paring rohmat lan kenikmatan
Rino wengine tanpo pitungan 2X
(aku memulai menembangkan syi�ir)
(dengan memuji kepada Tuhan)
(yang memberi rohmat dan kenikmatan)
(siang dan malamnya tanpa terhitung)

Duh bolo konco priyo wanito
Ojo mung ngaji syareat bloko
Gur pinter ndongeng nulis lan moco
Tembe mburine bakal sengsoro 2X
(wahai para teman pria dan wanita)
(jangan hanya belajar syari�at saja)
(hanya pandai bicara, menulis dan membaca)
(esok hari bakal sengsara)

Akeh kang apal Qur�an Haditse
Seneng ngafirke marang liyane
Kafire dewe dak digatekke
Yen isih kotor ati akale 2X
(banyak yang hapal Qur�an dan Haditsnya)
(senang mengkafirkan kepada orang lain)
(kafirnya sendiri tak dihiraukan)
(jika masih kotor hati dan akalnya)
Gampang kabujuk nafsu angkoro
Ing pepaese gebyare ndunyo
Iri lan meri sugihe tonggo
Mulo atine peteng lan nisto 2X
(gampang terbujuk nafsu angkara)
(dalam hiasan gemerlapnya dunia)
(iri dan dengki kekayaan tetangga)
(maka hatinya gelap dan nista)

Ayo sedulur jo nglaleake
Wajibe ngaji sak pranatane
Nggo ngandelake iman tauhide
Baguse sangu mulyo matine 2X
(ayo saudara jangan melupakan)
(wajibnya mengkaji lengkap dengan aturannya)
(untuk mempertebal iman tauhidnya)
(bagusnya bekal mulia matinya)

Kang aran sholeh bagus atine
Kerono mapan seri ngelmune
Laku thoriqot lan ma�rifate
Ugo haqiqot manjing rasane 2 X �
(Yang disebut sholeh adalah bagus hatinya)
(karena mapan lengkap ilmunya)
(menjalankan tarekat dan ma�rifatnya)
(juga hakikat meresap rasanya)

Al Qur�an qodim wahyu minulyo
Tanpo tinulis biso diwoco
Iku wejangan guru waskito
Den tancepake ing jero dodo 2X �
(Al Qur�an qodim wahyu mulia)
(tanpa ditulis bisa dibaca)
(itulah petuah guru mumpuni)
(ditancapkan di dalam dada)

Kumantil ati lan pikiran
Mrasuk ing badan kabeh jeroan
Mu�jizat Rosul dadi pedoman
Minongko dalan manjinge iman 2 X
(menempel di hati dan pikiran)
(merasuk dalam badan dan seluruh hati)
(mukjizat Rosul(Al-Qur�an) jadi pedoman)
(sebagai sarana jalan masuknya iman)

Kelawan Alloh Kang Moho Suci
Kudu rangkulan rino lan wengi
Ditirakati diriyadohi
Dzikir lan suluk jo nganti lali 2X
(Kepada Alloh Yang Maha Suci)
(harus mendekatkan diri siang dan malam)
(diusahakan dengan sungguh-sungguh secara ihlas)
(dzikir dan suluk jangan sampai lupa)

Uripe ayem rumongso aman
Dununge roso tondo yen iman
Sabar narimo najan pas-pasan
Kabeh tinakdir saking Pengeran 2X
(hidupnya tentram merasa aman)
(mantabnya rasa tandanya beriman)
(sabar menerima meski hidupnya pas-pasan)
(semua itu adalah takdir dari Tuhan)

Kelawan konco dulur lan tonggo
Kang podho rukun ojo dursilo
Iku sunahe Rosul kang mulyo
Nabi Muhammad panutan kito 2x
(terhadap teman, saudara dan tetangga)
(yang rukunlah jangan bertengkar)
(itu sunnahnya Rosul yang mulia)
(Nabi Muhammad tauladan kita)

Ayo nglakoni sakabehane
Alloh kang bakal ngangkat drajate
Senajan asor toto dhohire
Ananging mulyo maqom drajate 2X
(ayo jalani semuanya)
(Allah yang akan mengangkat derajatnya)
(Walaupun rendah tampilan dhohirnya)
(namun mulia maqam derajatnya di sisi Allah)

Lamun palastro ing pungkasane
Ora kesasar roh lan sukmane
Den gadang Alloh swargo manggone
Utuh mayite ugo ulese 2X
(ketika ajal telah datang di akhir hayatnya)
(tidak tersesat roh dan sukmanya)
(dirindukan Allah surga tempatnya)
(utuh jasadnya juga kain kafannya)

ياَ رَسُولَ اللهْ سَلاَمٌ عَلَيْكْ * يَا رَفِيْعَ الشَّانِ وَ الدَّرَجِ

عَطْفَةً يَّاجِيْرَةَ الْعَالَمِ * يَا أُهَيْلَ الْجُودِ وَالْكَرَمِ

wikusama mailist

Menampilkan seluruh Relasi dalam sebuah table di ORACLE

mamat — Tue, 02 Aug 2011 15:21:14 +0700

select owner,constraint_name,constraint_type,table_name,r_owner,r_constraint_name
from all_constraints
where constraint_type='R' and OWNER='KAI3'
and r_constraint_name in (select constraint_name from all_constraints
where constraint_type in ('P','U') and table_name='T4_TABLE')