タグ

ブックマーク / fbis.hatenablog.com (3)

  • 配列のデリファレンス構文? - Unknown::Programming

    配列やハッシュの要素へのアクセス方法は、大きく分けて3通りがあります。 インデックスでのアクセス スライスでのアクセス デリファレンス?でのアクセス(この方法、調べてもわかりませんでした。しかし、アクセス出来ることは確かです。) ※3番の方法を詳しく知っている方、よろしければ、ご教示お願い致します。 一次元 @a = (10, 20, 30); # 以下は、すべて「10」と表示される print $a[0], "\n"; # インデックスで@aの0番目要素をアクセス print @a[0], "\n"; # スライスで@aの0番目要素をアクセス print @a->[0], "\n"; # デリファレンス?で@aの0番目要素をアクセス? 配列&ハッシュのアクセス方法いろいろ - 燈明日記 別にまったく詳しくは無いんですが、3番目の例が摩訶不思議で気になったので実行してみました。 すると U

    配列のデリファレンス構文? - Unknown::Programming
    akio0911
    akio0911 2008/03/04
    []
  • クラスデータをダンプしたい! - Unknown::Programming

    Class::Data::InheritableやClass::Data::Accessorとかでクラスデータを作成するのは凄く便利なんだけど、そのクラスにどれだけクラスデータが存在してるのかとがすぐには把握できないのがデメリットです。 なのでさくっとクラスデータをダンプするモジュールを作ってみました。 package Class::Data::Dumper; use strict; use warnings; use Data::Dumper (); use Class::Inspector; our $VERSION = '0.01'; our %PACKAGE = map { $_ => 1 } qw/ Class::Data::Inheritable Class::Data::Accessor /; sub target { shift; my $target_class = sh

    クラスデータをダンプしたい! - Unknown::Programming
    akio0911
    akio0911 2008/03/04
    []
  • Fizz-Buzz問題 - Unknown::Programming

    どうしてプログラマに・・・プログラムが書けないのか? Fizz-Buzz問題の例はこんな感じだ。 1から100までの数をプリントするプログラムを書け。ただし3の倍数のときは数の代わりに「Fizz」と、5の倍数のときは「Buzz」とプリントし、3と5両方の倍数の場合には「FizzBuzz」とプリントすること。 ちゃんとしたプログラマであれば、これを実行するプログラムを2分とかからずに紙に書き出せるはずだ。怖い事実を聞きたい? コンピュータサイエンス学科卒業生の過半数にはそれができないのだ。自称上級プログラマが答えを書くのに10-15分もかかっているのを見たこともある。 記事の内容はともかく思わず反応。 ってことでまずは何も考えずぼーっと書いてみた use Perl6::Say; for my $i (1..100) { if ( $i % 3 == 0 && $i % 5 == 0 ) {

    Fizz-Buzz問題 - Unknown::Programming
  • 1