ファイルãƒãƒ³ãƒ‰ãƒ«ã‚’ã‚ãる冒険（ãŸã ã—マニアå‘ã‘） - daily dayflower
以下㯠Perl 5.8.8 ã®ã‚½ãƒ¼ã‚¹ã‚’å…ƒã«è¨˜è¿°ã—ã¾ã—ãŸã€‚Perl 5.10 ã§ã‚‚ãã†å¤‰ã‚ã£ã¦ã¯ã„ãªã„ã¨æ€ã„ã¾ã™ãŒï¼Œçµæ§‹å†…部ãŒå¤‰æ›´ã•ã‚Œã¦ã„ã‚‹ã®ã§é•ã†ã‹ã‚‚ã—ã‚Œã¾ã›ã‚“。大ã¾ã‹ã«ã¯åŒã˜ã ã¨æ€ã„ã¾ã™ã€‚ イントãƒãƒ€ã‚¯ã‚·ãƒ§ãƒ³ Perl ã§ã®ãƒ•ã‚¡ã‚¤ãƒ«ãƒãƒ³ãƒ‰ãƒ«ã¯å†…部的ã«ã¯ [http://search.cpan.org/perldoc?IO::Handle:title=IO::Handle] オブジェクトã¨ã—ã¦ä¿æŒã•ã‚Œã¦ã„ã¾ã™ã€‚ãã®ã‚ˆã†ãªè¨˜è¿°ã¯ perl5004delta ãらã„ã§ã—ã‹è¦‹ã¤ã‹ã‚Šã¾ã›ã‚“ã§ã—ãŸã€‚ラクダ本ã«ã‚‚ãªã‹ã£ãŸã‚ˆã†ãªã€‚ Internal change: FileHandle class based on IO::* classes File handles are now stored internally as type IO::Handle. The FileHandle module
my 宣言ã¨ãƒ¬ã‚シカル (lexical) 変数
Landscape トップページ | < å‰ã®æ—¥ 2002-10-24 2002-11-01 次ã®æ—¥ 2002-11-06 > Landscape - エンジニアã®ãƒ¡ãƒ¢Â 2002-11-01 my 宣言ã¨ãƒ¬ã‚シカル (lexical) 変数 当サイト内を Google 検索ã§ãã¾ã™ * my 宣言ã¨ãƒ¬ã‚シカル (lexical) 変数ã“ã®è¨˜äº‹ã®ç›´ãƒªãƒ³ã‚¯URL: Permlink | ã“ã®è¨˜äº‹ãŒå±žã™ã‚‹ã‚«ãƒ†ã‚´ãƒª: [Perl] ãŠã•ã‚‰ã„。my 㯠ブレース { } ã§å›²ã¾ã‚ŒãŸãƒ–ãƒãƒƒã‚¯ã«ã€å¤‰æ•°ã®ã‚¹ã‚³ãƒ¼ãƒ—ã‚’é™å®šã™ã‚‹ã€‚ãŸã ã—ã€ãƒ–ãƒãƒƒã‚¯å†…ã§å‘¼ã³å‡ºã—ãŸã‚µãƒ–ルーãƒãƒ³ã¯ã‚¹ã‚³ãƒ¼ãƒ—外。ブãƒãƒƒã‚¯å†…ã§å‘¼ã³å‡ºã—ãŸã‚µãƒ–ルーãƒãƒ³å†…もスコープã«å…¥ã‚ŒãŸã‘ã‚Œã°ã€local を使ã†ã€‚ 以下ã®ã‚³ãƒ¼ãƒ‰ã‚’実行ã™ã‚‹ã¨ã€ã‚¹ã‚³ãƒ¼ãƒ—ã®å¤–ãªã®ã§ä½•ã‚‚表示ã•ã‚Œãªã„。 use strict; ã™ã‚‹ã¨ã€$str ã®æ‰€å±žãƒ‘ッケージåãŒå¿…è¦ã€ã¨ã„ã†ã‚¨ãƒ©ãƒ¼ãŒ
Amazon倉庫ã¯ãƒ‹ãƒ¼ãƒˆã§ã‚‚出æ¥ã‚‹ç°¡å˜ãªãŠä»•äº‹ã‚‰ã—ã„ : オーニソプターズ
作æ¥å†…容 ルンãƒã¿ãŸã„ãªè‡ªå‹•ã§é€ã‚‰ã‚Œã¦ãる棚ã«å•†å“ã‚’ãƒãƒ¼ã‚³ãƒ¼ãƒ‰ã§ã‚¹ã‚ャンã—ã¦å…¥ã‚Œã‚‹ã 㑠ノルマã¯ï¼‘æ—¥3000件 拘æŸæ™‚é–“11時間(勤務時間10時間プラス休憩1時間) 時給1050円 ãªã‚“jæ°‘ã«ã‚ªã‚¹ã‚¹ãƒ¡
YouTube API利用コードをPerlモジュール化ã—ã¦ã¿ãŸ - Daio Today
YouTube API利用コードをPerlモジュール化ã—ã¦ã¿ãŸ 「ゆーã™ã‘ã¹ãƒ¼æ—¥è¨˜: Perl ã‹ã‚‰ YouTube ã®æ–°API を使ã£ã¦å‹•ç”»ã‚’アップãƒãƒ¼ãƒ‰ã™ã‚‹ã€ã§å…¬é–‹ã•ã‚Œã¦ã„ãŸã‚³ãƒ¼ãƒ‰ã‚’ã»ã¨ã‚“ã©ãã®ã¾ã¾åˆ©ç”¨ã•ã›ã¦ã‚‚らã£ã¦ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’作ã£ã¦ã¿ãŸã€‚ OO化ã—ã¦ã‚‚ã‚ã¾ã‚Šæ„味無ã•ãã†ãªã®ã§å˜ã«ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«åŒ–ã—ãŸã ã‘。 個人的事情㧠IO::All を使ã£ã¦ã„ãŸéƒ¨åˆ†ã¯ IO::File を使ã†ã‚ˆã†ã«ãƒ€ã‚µæ–¹å‘ã«å¤‰æ›´ã•ã›ã¦ã‚‚らã„ã¾ã—ãŸã€‚ã™ã‚“ã¾ã›ã‚“。 オリジナルã®ã‚³ãƒ¼ãƒ‰ã«ãƒ©ã‚¤ã‚»ãƒ³ã‚¹ã¯æ˜Žè¨˜ã•ã‚Œã¦ã„ãªã‹ã£ãŸã®ã ã‘ã©ã€ã“ã®ã‚³ãƒ¼ãƒ‰ã¯ã‚ªãƒªã‚¸ãƒŠãƒ«ã®ã‚³ãƒ¼ãƒ‰ã«æº–ã˜ã‚‹ã¨ã„ã†äº‹ã«ã—ã¾ã™ã€‚ 追記: 時間を置ã„ã¦ãƒˆãƒ©ãƒƒã‚¯ãƒãƒƒã‚¯pingã‚’2回é€ã£ã¦ã¿ãŸãŒã€åæ˜ ã•ã‚Œãªã„ã¿ãŸã„ package Net_YouTube; use strict; use warnings; use LWP::UserAgent; use HTTP::Req
lib/pQuery.pm - metacpan.org
The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending. use strict; use warnings; package pQuery; our $VERSION = '0.24'; use pQuery::DOM; use Carp; use HTML::TreeBuilder(); use base 'Exporter'; our $document; *pQuery = \$document; our @EXPORT = qw(pQuery $pQuery PQUERY); my $my = {}; my $lwp_user_agent; my $quick
Rolling with Ruby on Rails
Now, next, and beyond: Tracking need-to-know trends at the intersection of business and technology AI/ML Few technologies have the potential to change the nature of work and how we live as artificial intelligence (AI) and machine learning (ML). Future of the Firm Everything from new organizational structures and payment schemes to new expectations, skills, and tools will shape the future of the fi
Linux標準ã«Perlã¨PythonãŒè¿½åŠ ï¼ ï¼ IT
2008/02/20 Linuxã®æ¨™æº–化を推進ã™ã‚‹Linuxファウンデーションã¯2月18æ—¥ã€æ¨™æº–仕様ã®æœ€æ–°ç‰ˆã€ŒLinux Standard Base 3.2ã€ï¼ˆLSB3.2）を発表ã—ãŸã€‚LSB3.2ã§ã¯æ–°ãŸã«ã€Perlã‚„Pythonã¨ã„ã£ãŸã‚¹ã‚¯ãƒªãƒ—ト言語をå«ã‚€ã»ã‹ã€ãƒ—リントシステムやマルãƒãƒ¡ãƒ‡ã‚£ã‚¢é–¢é€£ã®ãƒ—ãƒã‚¸ã‚§ã‚¯ãƒˆã‚’å–り入れã¦ã„る。 Linuxã§ã¯ãƒ‡ã‚£ã‚¹ãƒˆãƒªãƒ“ューションã”ã¨ã«ã€ã‚¤ãƒ³ã‚¹ãƒˆãƒ¼ãƒ«ã•ã‚Œã¦ã„るコマンドやライブラリã€ãƒ‡ã‚£ãƒ¬ã‚¯ãƒˆãƒªæ§‹é€ ã€ãƒ‡ã‚¹ã‚¯ãƒˆãƒƒãƒ—環境ãŒç•°ãªã‚‹ã€‚ã“ã®ãŸã‚ISVã«ã¨ã£ã¦è‡ªç¤¾é–‹ç™ºã®ã‚¢ãƒ—リケーションを多ãã®ãƒ‡ã‚£ã‚¹ãƒˆãƒªãƒ“ューションã«å¯¾å¿œã•ã›ã‚‹ã“ã¨ã¯é›£ã—ã„。LSBã¯ã€ã“ã†ã—ãŸé•ã„ã®ã‚ã‚‹LinuxåŒå£«ã§äº’æ›æ€§ã‚’å‘上ã™ã‚‹æ¨™æº–仕様を定ã‚ã‚‹ã‚‚ã®ã§ã€ã“ã‚Œã¾ã§ã«Debian GNU/Linuxã€Mandriva Linuxã€Novell SUSE Linuxã€Red Hat Linuxã€Ubu
utf8オンãªæ–‡å—列ã®ãƒã‚¤ãƒˆæ•°ã®å–得方法 - Unknown::Programming
use utf8ã—ã¦ã„る時ã®lengthã¯æ–‡å—æ•°ã‚’æ•°ãˆã¦ã—ã¾ã†ã‘ã©ã€ãれ以外ã®ã¨ãã¯ã€ãƒã‚¤ãƒˆæ•°ã‚’æ•°ãˆã‚‹ãã†ã 。ã¨ã“ã‚ã§ã€ä»¥ä¸‹ã®ã‚ˆã†ã«ã—ãŸã‚‰utf8ã®ãƒã‚¤ãƒˆæ•°ãŒå–れるんã˜ã‚ƒãªã„ã‹ã¨æ€ã†ã‚“ã ã‘ã©ã€ã‚ã¾ã‚Šutf8æ–‡å—列ã®ãƒã‚¤ãƒˆæ•°ã«éœ€è¦ãŒãªã„ã®ã‹ã€ã‚°ã‚°ã£ã¦ã‚‚例ãŒå‡ºã¦ã“ãªã„。 何ã‹è¦‹ãŠã¨ã—ã¦ã„ã‚‹ã®ã‹ã‚‚ã—ã‚Œãªã„ãªã€‚ use utf8; my $bytes = length unpack('a*',$utf8_str); use utf8ã§ã®æ–‡å—列ã®ãƒã‚¤ãƒˆæ•° ã“ã‚Œã€åƒ•ã‚‚昔å–得方法ã‚ã‹ã‚“ãªãã¦å›°ã£ãŸã“ã¨ãŒã‚る。 ã£ã¦ã“ã¨ã§å•“蒙活動ã—ã¨ã。 bytes::lengthを使ã„ã¾ã™ã€‚ use utf8; require bytes; my $bytes = bytes::length $utf8_str; 「require bytesã€ãŒå¤§äº‹ã「require bytesã€ãŒã€‚ã‚‚ã—「use bytesã€ã—ã¡ã‚ƒã£
CSVã¨ã‹TAB区切りファイルã¨ã‹ã‹ã‚‰ã€ã‚¢ãƒ¬ã‚¤ãƒãƒƒã‚·ãƒ¥ã‚’作るãƒãƒƒãƒ— - Lazy Programmer :-p
一行目ãŒã‚ーã§ã€ãれ以é™ãŒãƒ‡ãƒ¼ã‚¿ã®ãƒ•ã‚¡ã‚¤ãƒ«ã‚’æƒ³å®šï¼ ã“ã®ã‚³ãƒ¼ãƒ‰ãŒã‹ã£ã“ã„ã„。id:hideden ã«æ•™ãˆã¦ã‚‚らã£ãŸã€‚ Thanks! @row{ @fields } = split("\t" , $line ); サンプル use strict; use warnings; use Data::Dumper; my $tab = "\t"; my $DATA =<<__TAB__; id${tab}message${tab}status 1${tab}test1${tab}disable 2${tab}test2${tab}enable 3${tab}test3${tab}disable __TAB__ my $is_first_line = 1; my @fields = (); my @data = split("\n" , $DATA ); my @nice_format_data
Geography::AddressExtract::Japanを使ã£ã¦ä½æ‰€æŠ½å‡º : cotalog
Web::Scraperを使ã£ã¦ã€ç‰©ä»¶ä¸€è¦§ã‚’Google Mapsã«ãƒžãƒƒãƒ”ング : cotalog ã®è¨˜äº‹ã§ã™ãŒã€ä½æ‰€ã‚’å–å¾—ã™ã‚‹ã¨ã“ã‚ã¯ã‹ãªã‚Šã‚ã‚„ã—ã„ã¨ã„ã†ã‹ã€ã¦ãã¨ãƒ¼ãªæ£è¦è¡¨ç¾ã§ã”ã¾ã‹ã—ã¦ã„ã¾ã—ãŸã€‚ ã¯ã¦ãƒ–ã®ã‚³ãƒ¡ãƒ³ãƒˆã§jmalaã•ã‚“ã«æ•™ãˆã¦ã‚‚らã£ãŸã€ ä½æ‰€æŠ½å‡ºãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã‚’CodeReposã«ã‚‚ã£ã¦ã㟠- Yappo::Hatena::Diaryを早速ãƒã‚§ãƒƒã‚¯ã‚¢ã‚¦ãƒˆã—ã¦åˆ©ç”¨ã—ã¦ã¿ã‚‹ã“ã¨ã«ã€‚ 2006/10/20 Shibuya.pm tech talk #7 Geography::AddressExtract::Japan - Yappoã‚‚åˆã‚ã›ã¦èªã‚“ã§ã¿ãŸã®ã§ã™ãŒã€å‡„ã„ã§ã™ã‚ˆã“ã®ãƒ¢ã‚¸ãƒ¥ãƒ¼ãƒ«ã¯ã€‚ try.pl #!/usr/local/bin/perl use strict; use Geography::AddressExtract::Japan; use encoding "utf8
1
リリースã€éšœå®³æƒ…å ±ãªã©ã®ã‚µãƒ¼ãƒ“スã®ãŠçŸ¥ã‚‰ã›
最新ã®äººæ°—エントリーã®é…ä¿¡
j次ã®ãƒ–ックマーク
kå‰ã®ãƒ–ックマーク
lã‚ã¨ã§èªã‚€
eコメント一覧を開ã
oページを開ã
http://ne.tc/2008/03/13/%25e5%259c%25a7%25e7%25b8%25ae%25e3%2581%2595%25e3%2582%258c%25e3%2581%259fflvcws%25e3%2582%2592%25e8%25a7%25a3%25e5%2587%258dfws%25e3%2581%2599%25e3%2582%258b-cws-to-fws/
2006/10/20 Shibuya.pm tech talk #7 Geography::AddressExtract::Japan - Yappo
{{#tags}}- {{label}}
{{/tags}}