Ticket #27750

strmatch はシステム変数が初期化されない。

Open Date: 2012-03-05 17:50 Last Update: 2012-03-08 21:42

Reporter:
(Anonymous)
Owner:
(del#1144)
Type:
Status:
Closed
Component:
Priority:
5 - Medium
Severity:
5 - Medium
Resolution:
None
File:
None
Vote
Score: 0
No votes
0.0% (0/0)
0.0% (0/0)

Details

Tera Term Version 4.73 (SVN# 4845) を、Windows XP Professional Version 2002 SP3 で使用しています。 strmatch では、システム変数が初期化されていない様です。 例えば、次のマクロを実行してみると、messagebox の結果は、';' の右側に書いたとおりとなります。

string1 = 'Microsoft Windows XP [Version 5.1.2600]'
strmatch string1 '\[(Version (\d+).(\d+).(\d+))\]'

messagebox result 'result'                   ; 22
messagebox matchstr 'matchstr'               ; [Version 5.1.2600]
messagebox groupmatchstr1 'groupmatchstr1'   ; Version 5.1.2600
messagebox groupmatchstr2 'groupmatchstr2'   ; 5
messagebox groupmatchstr3 'groupmatchstr3'   ; 1
messagebox groupmatchstr4 'groupmatchstr4'   ; 2600


string2 = ''
strmatch string2 '\[(Version (\d+).(\d+).(\d+))\]'

messagebox result 'result'                   ; 0
messagebox matchstr 'matchstr'               ; [Version 5.1.2600]
messagebox groupmatchstr1 'groupmatchstr1'   ; Version 5.1.2600
messagebox groupmatchstr2 'groupmatchstr2'   ; 5
messagebox groupmatchstr3 'groupmatchstr3'   ; 1
messagebox groupmatchstr4 'groupmatchstr4'   ; 2600

Ticket History (3/5 Histories)

2012-03-05 17:50 Updated by: None
  • New Ticket "strmatch はシステム変数が初期化されない。" created
2012-03-06 15:19 Updated by: (del#1144)
Comment

マッチしなかったときはクリアしない実装になっています。マッチしたかどうか result で判定できますが、クリアされないと不都合がありますか?

Perl では同様の動作をします。

  1. #!/usr/bin/perl
  2. $str = "Microsoft Windows XP [Version 5.1.2600]";
  3. $str =~ /\[(Version (\d+).(\d+).(\d+))\]/;
  4. print "$1\n";
  5. print "$2\n";
  6. print "$3\n";
  7. print "$4\n";
  8. $str = "";
  9. $str =~ /\[(Version (\d+).(\d+).(\d+))\]/;
  10. print "$1\n";
  11. print "$2\n";
  12. print "$3\n";
  13. print "$4\n";
2012-03-06 23:45 Updated by: (del#24082)
Comment

とりあえず、ドキュメントには注意事項を書いておきます。

2012-03-07 11:46 Updated by: keishim
Comment

ご確認ありがとうございます。仕様とのことで理解しました。 また、ドキュメントへの注意書き対応助かります。ありがとうございます。 (自分のマクロロジックを見直すことで対応します)

2012-03-08 21:42 Updated by: (del#1144)
  • Ticket Close date is changed to 2012-03-08 21:42
  • Status Update from Open to Closed

Attachment File List

No attachments

Edit

You are not logged in. I you are not logged in, your comment will be treated as an anonymous post. » Login