perlの変数の値を取得？？？

zedex · ＃1 （**固定リンク**） 2009年5月27日

こんにちは私のコードを以下のものが

コード：

my $a1 = "A" ;
my $a2 = "B" ;
my $a3 = "C" ;

foreach my $k ( 1,2,3 ) 
{
    my $msg = ${a{$k}} # this should be at runtime i am creating variable a1 and assigning it value to msg .
    print "$msg\n" ;
}

cbkihong · ＃2 （**固定リンク**） 2009年5月27日

コード：

# No "my" here
$a1 = "A" ;
$a2 = "B" ;
$a3 = "C" ;

foreach my $k ( 1,2,3 )
{
    my $msg = ${"a${k}"};
    print "$msg\n" ;
}

zedex · ＃3 （**固定リンク**） 2009年5月27日

私は配列での作業だった。

コードの中で繰り返していたが、実際にそこにかかわっていた。 5,6,7のように1引数の長さをチェックし、有効なエントリの後にチェックするので、私は間違っていたの引数を印刷したいです。

コード：

$ARG5 = "ADD ENTRY TO DATABASE" ;
$ARG6 = "ADD ENTRY TO REG FILE" ;
$ARG7 = "SHOW DEBUG MSG" ;

foreach $k in ( 5,6,7) 
{ 
     if ...
     {
      } else 
      { 
             print ${"ARG$k"} entry invalid\n" ;      
       }
}
 
so i created array 

@ARG = ( undef ,undef, ..., "ADD ENTRY TO REG FILE",...) ;

KevinADC · ＃4 （**固定リンク**） 2009年5月27日

zedex 、

何をしたいのハッシュを使用しています。

あなたのコードの作品の残りの部分と仮定すると：

コード：

my %ARG = (
   5 => "ADD ENTRY TO DATABASE",
   6 => "ADD ENTRY TO REG FILE",
   7 => "SHOW DEBUG MSG",
);

foreach $k in (5,6,7) {
{ 
     if ...
     {
      } else 
      { 
             print "$ARG{$k} entry invalid\n" ;      
       }
}

zedex · ＃5 （**固定リンク**） 2009年5月28日

おかげでKevinADC

実際に私は多くのことに関与していたので、単純なハッシュの使用について忘れてしまった。同じ理由から、以前にもかかわらず、私はこのためにハッシュを使用..勝手を知っている任意の方法をどのようにできてうれしい

その他のUNIXおよびLinuxフォーラムトピックは参考にすること
スレッド	スレッドスターター	フォーラム	返信	最後の投稿
Perlでの変数に複数の変数	Raynon	シェルプログラミングとスクリプティング	3	2009年5月4日 11:10午後
Perlのパスにcsh変数	Raynon	シェルプログラミングとスクリプティング	9	2007年10月19日 10:46午後
私のperlの変数を読んでいない	yoonixq4u	シェルプログラミングとスクリプティング	3	2007年8月24日 10:24午後
NULLである場合、変数のPERL ：どのように伝える	dangral	シェルプログラミングとスクリプティング	4	2003年3月19日 01:34午後
perlの変数assingment	seismic_willy	シェルプログラミングとスクリプティング	2	2002年1月29日 04:54午後

スレッドツール	このスレッドを検索
印刷用バージョンを表示するこのページをメール	このスレッドを検索：高度な検索
表示モード	このスレッド
スイッチリニアモードハイブリッドモードスレッドを切り替えるモード	このスレッド：


	を搭載