Help for this page

Select Code to Download


  1. or download this
    GetOptions(x=>my $x=1,y=>my $y);
    
  2. or download this
    GetOptions('x',(my $x=1,y=>my $y));
    
  3. or download this
    \($x,$y,$z)
    
  4. or download this
    (\$x,\$y,\$z)
    
  5. or download this
    my $txt="Foo bar";
    (my $clean=$txt)=~s/oo/u/g;
    ...
    open my $fh,"File" or die "File $!";
    
    if (my ($x,$y,$z)=/A(..)(..)(..)Z/) { }