I am using local vaiables in a sub. But with @wire2 it is not working. The history of this variable is keept like I would expect it for a global variable. 
#!/usr/bin/perl 

 wr_module("1");
 wr_module("2");
 wr_module("3");
 exit;


sub wr_module 
{ my $x=shift;
  my $wire0;
  my @wire1;
  my @wire2;
  print("Adding $x ");  
  $wire0.=$x;
  $wire1[1].=$x;
  $wire2{"a"}.=$x;
  print(" => $wire0 :: $wire1[1] :: $wire2{\"a\"} \n");
}

[download]
The script returns: 
Adding 1  => 1 :: 1 :: 1 
Adding 2  => 2 :: 2 :: 12 
Adding 3  => 3 :: 3 :: 123

[download]
I would expect: 
Adding 1  => 1 :: 1 :: 1 
Adding 2  => 2 :: 2 :: 2 
Adding 3  => 3 :: 3 :: 3

[download]
Do you have an idea, why the "my" is not working for @wire2 ? Thanks for your help !

In reply to using local variables by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.