PowerPoint プレゼンテーション

open(FILE, "ls -l |");
while(<FILE>){
print $_;
}
open(FILE, "ls -l |");
$dummy = <FILE>;
while(<FILE>){
chop;
$_ =~ s/ +/ /g;
@line = split(/ /,$_);
print “You have file “, $line[8], “ in
this directory.\n”;
}
close FILE;
リファレンス
スカラーの場合
$var = 100;
リファレンス ¥$var
$var_ref = ¥$var; # $varという変数が格納されているアドレスを求め
る
デリファレンス $$var_ref
print $$var_ref; # アドレス$var_refの中味を見る
リストの場合
@a = (“A”, “B”, “C”);
リファレンス ¥@a
$a_ref = ¥@a; # @aという変数が格納されているアドレスを求める
デリファレンス @$a_ref
print @$a_ref; # アドレス$a_refの中味の配列を見る
GenBankサンプルファイル
less /pub/sfc/dnadb/genbank/test.seq
/^ *[0-9]+ [a-z]/
$_ =~ s/[^a-z]//g;

Download Report