EasyTool EasyTool is the library of Perl Functions in Common Usage.
Download

EasyTool Ranking & Summary

EasyTool Tags

Perl module perl library functions Perl functions Perl usage

EasyTool Description

EasyTool is the library of Perl Functions in Common Usage. EasyTool is the library of Perl Functions in Common Usage.SYNOPSIS use EasyTool; if(defined(&EasyTool::foo)){ print "lib is included"; }else{ print "lib is not included"; } print EasyTool::is_int(2147483647); #true print EasyTool::is_int(-2147483648); #true print EasyTool::is_int(2147483648); #false print EasyTool::is_id(4294967295); #true print EasyTool::is_id(4294967296); #false print EasyTool::is_email("xxx.abc@test.com"); #true print EasyTool::trim(" t testn "); #test print EasyTool::in('a', {'a' => 1, 'b' => 2}); #true print EasyTool::in(undef, 1, undef); #true print EasyTool::ifnull(undef, 1); #1 print EasyTool::read_file("file.in"); print EasyTool::write_file("file.out", "string"); print EasyTool::append_file("file.out", "string"); print EasyTool::delete_file("file.out"); $ra_array = EasyTool::csv_2_array("a.csv"); print EasyTool::array_2_csv("a.csv", $ra_array); print EasyTool::md5_hex("test"); #'098f6bcd4621d373cade4e832627b4f6' print EasyTool::crc32("test"); #3632233996 $str = &EasyTool::encode_hex("hello"); print EasyTool::decode_hex($str); #hello $str = &EasyTool::encode_base64("hello"); print EasyTool::decode_base64($str); #hello $str = &EasyTool::url_encode('@^'); print EasyTool::url_decode($str); #@^ $str = &EasyTool::html_encode(";<""); print EasyTool::html_decode($str); #;<" print EasyTool::qquote('n'); #"\n" print EasyTool::qquote_bin('n'); #"\n" print EasyTool::dump(); # print EasyTool::test_var(); #undef print EasyTool::test_var(1); #1 print EasyTool::test_var(); #1 print EasyTool::time_2_str('1983-03-07 01:02:03','%yyyy-%MM-%'); print EasyTool::time_2_str('1983-03-07 01:02:03'); print EasyTool::time_2_str('1983-03-07'); print EasyTool::time_2_str('2004-08-28T08:06:00'); print EasyTool::time_2_str('946656000'); print EasyTool::time_2_str(' 1983-03-07 '); print EasyTool::time_2_str('1983-03-07T01:02:03'); print EasyTool::is_time('1983-03-07 01:02:03'); print EasyTool::time_2_timestamp('1983-03-07 01:02:03'); print EasyTool::hash_2_timestamp({year=>1983,month=>3,day=>7,hour=>1,min=>2,sec=>3}); $rh_time=EasyTool::time_2_hash('1983-03-07 01:02:03'); #{year=>1983,month=>3,day=>7,hour=>1,min=>2,sec=>3} print EasyTool::now(); print EasyTool::time(); print EasyTool::datetime_now(); print EasyTool::date_now(); print EasyTool::day_of_month(2000,2); #29 print EasyTool::day_of_week('2006-07-02'); #0 print EasyTool::timestamp_set('1983-03-07 01:02:03',{year=>1984,month=>5,day=>10,hour=>5,min=>7,sec=>9});#maybe 453013629 print EasyTool::datetime_set('1983-03-07 01:02:03',{year=>1984,day=>10,min=>7});#'1984-03-10 01:07:03' print EasyTool::date_set('1983-03-07 01:02:03'',{month=>5,hour=>5,sec=>9});#'1983-05-07' print EasyTool::timestamp_add('1983-03-07 01:02:03',{year=>1,month=>2,day=>3,hour=>4,min=>5,sec=>6});#maybe 453013629 $datetime=EasyTool::datetime_add('1983-03-07 01:02:03',{year=>1,day=>3,min=>5});#'1984-03-10 01:07:03' $date=EasyTool::date_add('1983-03-07 01:02:03',{month=>2,hour=>4,sec=>6});#'1983-05-07'Requirements:· Perl Requirements: · Perl

EasyTool Related Software