サブルーチン

「サブルーチン」を含むブログ

• サブルーチンを含むブログはまだありません。
• サブルーチンについてのブログが作成されると自動的に表示されます。 今すぐブログを作成する

「サブルーチン」を含むウィキ

2010年01月30日 11:01:01

• プロシージャ - abwiki @ ウィキ - プロシージャ  2010-01-30 11:01 記事の概要：
  関数とかサブルーチンとかのひとつの処理のまとまり。

2009年11月11日 19:20:53

• REXX/関数・サブルーチン - bonze2 @ ウィキ - REXX/関数・サブルーチン  2009-11-11 19:20 記事の概要：
  関数とサブルーチンの違いは、結果を呼び出し元に返すかどうかだけ。 関数 返す サブルーチン 返さない関数J=FUNC(2) /* 関数っぽく呼び出せるSAY J /* 4EXITFUNC PROCEDURE ARG N RETURN N*N変数のスコープ関数・サブルーチンの中では、変数スコープは完全に独立しており、呼び出し元の変数は参照できない。（逆に言えば、呼び出し元と同じ変数を使用しても影響を与えない）引数は値渡しである。I=10CALL SUB ISAY I /* 10EXITSUB PROCEDURE ARG I SAY I /* 10 I=50 /* Iを変更 SAY I /* 50 RETURN

2010年01月30日 11:21:03

• GoSub～Return - abwiki @ ウィキ - GoSub～Return  2010-01-30 11:21 記事の概要：
  名称GoSub～Return読みごぅさぶ～りたーん文法GoSub *label...label...Return説明サブルーチンにジャンプします。サブルーチンはラベルまたは行番号で始まり、Returnで終ります。Returnにくると、Gosubのつぎの行に戻ります。スタックが崩壊するのでGosubは絶対にReturnで返るようにしなければいけません。GoSub *SUB1Print "End"...End *SUB1Print "Call SUB1"Return

2009年11月11日 21:20:57

• REXX - bonze2 @ ウィキ - REXX  2009-11-11 21:20 記事の概要：
  スクリプト言語。IBMメインフレームでも使えるというのが最大の特徴かも。オブジェクト指向を取り入れたバージョンもあるらしい(ooREXX)が、ここではそうでないREXX(classic REXX)を扱う。REXX/文法REXX/変数・配列・連想配列REXX/関数・サブルーチンREXX/よくあるパターンREXX/レシピ集今日のアクセス数 - 合計アクセス数 -

2009年05月27日 01:05:00

• perlその1 - water0red @ ウィキ - perlその1  2009-05-27 01:05 記事の概要：
  (perlコマンド)http//www.rfs.jp/sb/perl/05/01.html(mysqlのオプション)http//www.rfs.jp/server/mysql/02/07.html$dbh データベースハンドルオブジェクト$sth ステートメントハンドルオブジェクト$drh ドライバハンドルオブジェクト$h 上記のハンドルのいずれか$rc 一般的な返りコード (ブール 真=成功、偽=エラー)$rv 一般的な返り値 (典型的に整数)@ary データベースから返される値のリスト。通常はデータの行$rows 処理された行の数 (なければ-1)$fh ファイルハンドルundef Perl では NULL は未定義( undef )\%attr メソッドに渡される属性値のハッシュのリファレンス# DBI モジュールの読み込みuse DBI;# データソースの指定# DBIDBMS名データベース名(ホスト名ポート名)$dsn = DBImysqlデータベース名;# データベースへ接続# connect(データベースソース,ユーザ名,パスワード) $dbh$dbh = DBI-connect($dsn, root);挿入、削除、変更、選択などの命令文をprepareメソッド(準備)executeメソッドで用意したSQL文を実行# prepareが成功した場合、ステートメントハンドルが返されるmy $sth = $dbh-prepare( "SELECT f2, f3 FROM table WHERE f1=?");# SQL文の実行$sth-execute;# データの取得と出力while(@row = $sth-fetchrow_array) { print "@row\n";}$dbh-disconnect;#サブルーチンの定義#($total, $mean) = answer; (戻り値の受け取り) = (引数);#return; return (戻り値); #localサブルーチンから呼び出されたサブルーチンからは参照可能(引き継ぎ可能)#my自分のサブルーチンのみ。(宣言されてなければグローバル関数を使う)#呼び出し 名前;#サブルーチンsub 名前{処理;}ヒアドキュメント----------------------------------#!/usr/bin/perlprint "どれを選択しますか?\n";$name = STDIN;#改行コードを削除するchomp $name;print "あなたは$nameを入力しました。\n";if ( $name == 1 ){quiz;}elsif($name == 2){decome;}elsif($name == 3){flash;}else{print "ありません\n";}#ルーチン処理sub quiz{print "quiz\n";}sub decome{print "decome\n";}sub flash{print "flash\n";}[miyoshi@CQtest-Official test]$ vi open.plmy @loglist;my $status;my $i;my @user_list;#useDataDumper;opendir (DIR,"./");@loglist = readdir (DIR);closedir(DIR);#print$#loglist;#foreach$i (@log_list){foreach $i (@loglist) { $status = open (OUT," au_user.txt "); if (!$status) { die sippai.; } print OUT $i; close(OUT);}#foreach$i (@user_list){# print "表示$i\n";#}sub display_all { my ($user_list) =}###############################use strict;my $path = ./;$result = get_file_list;if (!$result) { print ..... errror. ......; die;}$output = dump_all_list;sub get_file_list {}sub　dump_all_list {}サブルーチンから値を返すには、return を使います。return を省略すると、最後に評価された結果が戻り値となります。s/パターン/置換文字列/ 「パターン」にマッチする文字列を「置換文字列」に置き換える

「サブルーチン」を含むコミュニティ

• サブルーチンを含むコミュニティはまだありません。
• サブルーチンについてのコミュニティが作成されると自動的に表示されます。 今すぐコミュニティを作成する

「サブルーチン」を含む掲示板

• サブルーチンを含む掲示板はまだありません。
• サブルーチンについての掲示板が作成されると自動的に表示されます。 今すぐ掲示板を作成する

「サブルーチン」を含む2ch風掲示板

• サブルーチンを含む2ch風掲示板はまだありません。
• サブルーチンについての2ch風掲示板が作成されると自動的に表示されます。 今すぐ2ch風掲示板を作成する

「サブルーチン」を含む高性能掲示板

• サブルーチンを含む高性能掲示板はまだありません。
• サブルーチンについての高性能掲示板が作成されると自動的に表示されます。 今すぐ高性能掲示板を作成する

「サブルーチン」を含むお絵かき掲示板

• サブルーチンを含むお絵かき掲示板はまだありません。
• サブルーチンについてのお絵かき掲示板が作成されると自動的に表示されます。 今すぐお絵かき掲示板を作成する