Pages

Wednesday, April 25, 2012

Della丁噹【不是你的錯】MV youtube

好好听噢~~




丁噹 

不是你的錯



作詞:黃婷
作曲:林邁可

音樂停止了 引擎熄火了
窒息的溫柔 尖銳得赤裸
一刀一刀 往我心上割 往傷口裡戳
那麼折磨 為了甚麼

別說你難過 別再安慰我
最爛的理由 是你配不上我
我沒有你想像中脆弱 我會好好的
沒有甚麼 罪不可赦

再痛的痛苦淚水 換不回 一點點感動
我不怪你 不是你的錯
再深的深情容忍 也不能 讓你再愛我
我不怪你 不是你的錯


別說你難過 別再安慰我
最爛的理由 是你配不上我
我沒有你想像中脆弱 我會好好的
沒有甚麼 罪不可赦

再痛的痛苦淚水 換不回 一點點感動
我不怪你 不是你的錯
再深的深情容忍 也不能 讓你再愛我
我不怪你 不是你的錯


再痛的痛苦淚水 換不回 一點點感動
我不怪你 不是你的錯
再深的深情容忍 也不能 讓你再愛我
我不怪你 不是你的錯


我的世界 沒有你 也許更遼闊
就到這裡 錯了又 如何

Friday, April 20, 2012

read text file and store line in array



if (-e $file )
{
open(ori, $file);
while( my $line = )
{
if ($line =~ m/^connect/i)
{
push(@array,$line)
}
}
}
else
{
print" cannot find the file";
}


reference
1.http://stackoverflow.com/questions/1512729/how-can-i-search-multiple-files-for-a-string-in-perl

Tuesday, April 17, 2012

read excel file in unix PERL module

popular module :- spreadsheet::ParseExcel

able to read xls file
unable to read .xlsx file

Spreadsheet::XLSX
focus on reading value for xlsx file
limited functionality
http://groups.google.com/group/spreadsheet-writeexcel/browse_thread/thread/9a69b3da83db317?pli=1

Excel::reader
read xlsx file (haven't test out)
https://github.com/jmcnamara/excel-reader-xlsx

Monday, April 16, 2012

Spreadsheet-ParseExcel

http://search.cpan.org/~jmcnamara/Spreadsheet-ParseExcel-0.59/lib/Spreadsheet/ParseExcel.pm


contain many functions

Sunday, April 15, 2012

install Spreadsheet::WriteExcel Spreadsheet::ParseExcel

http://cpan.uwinnipeg.ca/htdocs/Spreadsheet-WriteExcel/INSTALL.html


http://www.thegeekstuff.com/2011/12/perl-and-excel/


install manually
http://www.thegeekstuff.com/2008/09/how-to-install-perl-modules-manually-and-using-cpan-command/

Thursday, April 12, 2012

verify whether variable is defined in perl

my $variable;

if (defined($variable))
{
print "defined";
}
else
{
print "not defined";
}

#---------------

unless (defined($variable)) {
print " not defined";
}
else
{
print" defined";
}

verify whether array is empty perl

use strict; use warnings;
my @array;

if (@array)
{
print "array not empty";
}
else
{ print "array empty";
}
------------------------------------------
unless (@array)
{
print "There is element inside array.";
exit(1);
}

 

site weekly hits