Help for this page

Select Code to Download


  1. or download this
    push (@{$ttys{$user}}, $tty );
    
  2. or download this
    my %ttys = ();
    
    ...
    {
    print "$user: @{$ttys{$user}}\n";
    }