ソフトウェアのバージョンアップに伴う品質低下のこと。 例1)エンバグ…今まで無かったバグを作りこんでしまうこと 例2)バージョン管理ミス…修正したはずの機能が数世代前のものになってしまうこと

ハードウェアやソフトウェアの細かい変更を表す改訂番号のこと。→プログラム等で修正を行ったら、rivision numberを上げてリリースし、改善されているかどうか確認する際に使用。rivision numberが変わっても、基本的な機能や性能は変わらない。 cf), バージ…

何らかのデータや情報、プログラムが体系立てて保管されている場所のこと。また、有用な情報を保管し、ユーザーが参照できる形で用意しておく仕組みのこと。・ソフトウェア開発分野で使用されるとき→ソースコードや設計情報などを保管するDBを指すことが多い…

#! usr/bin/perl use strict; use warnings; #◎関数values=>hashの値を返す関数 my %hash1=( 'koma'=>55, 'gema'=>11, 'baba'=>35, 'italy'=>777, 'france'=>454, 9=>'hello' ); my @keys = keys(%hash1); my @value = values(%hash1); print "@keys\n"; #出…

#! usr/bin/perl use strict; use warnings; #◎配列の要素のうち、重複するものをhashを使ってひとつにまとめる my %uniq; my @array = (3,5,7,8,9,7,8,7,9,1,3,'papa','mama','koma','papa','koma','Koma'); #my @array = (3,5,7,8,9,7,8,7,9,1,3,'papa,mam…

#! usr/bin/perl use strict; use warnings; #◎【基本】%ハッシュ名(キー => 値); => キーは文字列、値はスカラー my %hash = ( 'komage' => 1, 'gomage' => 2, 'mamage' => 3, 'papage' => 'パパです。' ); print $hash {'gomage'}."\n"; print $hash {'pap…

今日は学んだことが大量にあるのですが、次の予定が迫ってるので、明日の朝にアップします。 学んだこと概要 ・語彙3つ ・iterm ・コマンド(Mac OS X) ・ハッシュ

忙しいほど、計画的に動けるものですね。さて、今日はハッシュの復習。 #! usr/bin/perl use strict; use warnings; #◎【基本】%ハッシュ名(キー => 値); => キーは文字列、値はスカラー my %hash = ( 'komage' => 1, 'gomage' => 2, 'mamage' => 3, 'papage…

今日は、配列の復習をしました。せっかくいろいろ関数を覚えたんだから、いじってみないとねー。いろいろ試すのは楽しいです。でも、あんまり遊んでたら先に進まないから、ほどほどにしないと。ま、今のところ、C言語の経験があるからか、そんな大きくつまず…

#! usr/bin/perl use strict; use warnings; #◎sortとreverse関数の復習 my @array = qw(5 7 1 111 59 58 93); my @sorted = sort(@array); my @sorted1 = sort{$a<=>$b}(@array); print "@sorted\n"; #出力結果=>1 111 5 58 59 7 93=> 文字コードの小さい順…

#! usr/bin/perl use strict; use warnings; #◎配列の要素を切り分けて.htmlで表にして表示する。 my @info = ( 'kogematsu1@ko.com:koge matsu:11', #アドレスの「@」が展開されないように「''」を使用 'bokematsu2@bo.com:boke matsu:22', 'hagematsu3@ha.…

#! usr/bin/perl use strict; use warnings; my @array = qw(1 2 3 4 5 6 7 8); my $item = 'aabbcc'; #popやpush、shiftやunshift関数、配列のスライスをsplice関数で書き換えてみよーう #(=head=cutで囲まれた部分と同じものをspliceを使って書く) #◎【実…

#! usr/bin/perl use strict; use warnings; my $item = '01:23:45'; my ($hour, $min, $sec) = split (/:/,$item); print "$hour時$min分$sec秒です。\n";

#! usr/bin/perl use strict; use warnings; my @array = qw(11 22 33 44 55 66 77 88 99); #◎配列の一部をprintしてみる => @配列名[printしたい配列要素の添え字] print "@array[2,4,6,8]\n"; #出力結果 => 33 55 77 99 print "$array[2] $array[4] $array…

#! usr/bin/perl use strict; use warnings; my @array = qw(1 111 9 58 41 59); #◎【基本】sort(@並べ替えたい配列名); =>「文字列の文字コードが小さい順に」並べ替える。 my @sorted = sort(@array); print "@array\n"; #出力結果 =>1 111 9 58 41 59 pri…

今日もいろいろ実験してみました。ますは関数splice。 #! usr/bin/perl use strict; use warnings; #◎【基本】splice(要素をいじりたい配列の,この要素(添え字)から,これだけの要素数を削除し,そこにこのリストを挿入) my @array = qw(a b c d e f g h i j k…

(1)パーミッションとは ファイルの1つ1つ、もしくはディレクトリに対するアクセス権のこと (2)許可対象(3種類) ・ファイル所有者 ・所有者のグループ ・その他 (3)許可内容(3種類)とそれぞれの許可内容を表す記号と数字 ・読み取り：記号「r」数字「4」 ・書…

#! /usr/bin/perl use strict; use warnings; my @array = qw(a b 111 222 333); print "@array\n"; #出力結果 =>a b 111 222 333 #◎shift関数を使用して、配列の一番最初の要素を取り出してみよう。 my $item = shift(@array); print "$item\n"; #出力結果 …

#! /usr/bin/perl use strict; use warnings; my @array = qw(45 777 111 222 333); my $array = @array; print "@array\n"; #出力結果 => 45 777 111 222 333 =>@arrayの要素を出力。 print "$array\n"; #出力結果 => 5 =>@arrayの要素数を出力。 print "$a…

最近、疲れてきたのか、いつの間にか変なことをしています。今日なんか、自動販売機でお水を買おうと思ったのに、なぜか隣のボタンを押してしまっていて炭酸ジュースが出てくるなんてことが。一瞬びっくりした。お水のボタンを押したはずなのに、なぜ炭酸ジ…

(1)コマンドプロンプト windowsキー + R (2)以下のように打つ perldoc -f 関数名 例：join関数を調べるとき→perldoc -f join ※perldoc perlfuncと打つと、関数の一覧が出ます。(結構、文章量が多いので注意です。)

#! /usr/bin/perl use strict; use warnings; my $words = 'hello everyone!'; print $words,"\n"; #出力結果 => hello everyone! #「//」とすると、文字列を1バイトずつ切り出したリストを作る。 my @words = split(//,$words); print "@words\n"; #出力結…

#! /usr/bin/perl use strict; use warnings; my @array = (453,45,778); print "@array\n"; #関数join('区切り文字',連結したい配列や文字) => なにか連結したいときに使用 print join('あ',@array),"\n"; #出力結果 => 453あ45あ778 print "\n"; my $x = 1…

#! /usr/bin/perl use strict; use warnings; my $x = 567; my $y =75651; #値を交換する print "\$x=$x, \$y=$y\n"; ($x, $y) = ($y, $x); print "\$x=$x, \$y=$y\n"; #配列を連結 my @array1 = qw(a b c); my @array2 = qw(d e f); my @array = (@array1, …

だんだんMacが分かってきたような気がする。Winだと、アクティブになっているウィンドウの×印を押したりAlt＋F4を押したりすると、アプリケーションを終了することができた。Macだと、×印を押す = アプリケーションの終了にはならないことをようやく理解。Ma…

#! /usr/bin/perl use strict; use warnings; my @array = (31, 54, 76, 9786); #配列をスカラーに代入すると、配列の要素数が返る my $length = @array; print "$length\n"; #こんな感じ↓で書いちゃっても大丈夫 my @array1 =qw( 453 78654 45 75621 siueni…

winだと、ゴミ箱に一度捨てても、元に戻すことが可能だった。私は、ゴミ箱 = いらなくなったドキュメントなんかをとりあえず置いておくところ、みたいな認識をしていました。なので、Macになると、ゴミ箱にプログラムのアンインストールの役割があるとか、US…

#! /usr/bin/perl use strict; use warnings; #スカラー #,で区切って()で囲んだものをリストという。 my ($kokugo, $suugaku, $rika) = (90, 50, 76); print "$kokugo\n$suugaku\n$rika\n\n"; #配列 my @score = (70, 650, 7564); print "@score\n"; #出力…

#! /usr/bin/perl use strict; use warnings; print "入力された値が、数字だけで構成されているのかどうか判定するよ。\n"; my $line = <STDIN>; chomp ($line); #chomp関数で、改行をなくしちゃいます。 if ($line =~ /^\d+$/){ print "$lineは数字だよ。\n"; }el</stdin>…

#! /usr/bin/perl use strict; use warnings; my $x = 5; my $y = 14; if ($x >= $y){ print "$x >= $y\n"; }else{ print "$x < $y\n"; } #5の方が14より大きいと判定される。文字列として比較されているため。 #ge = greater than or equal to if ($x ge $y…