Help for this page

Select Code to Download


  1. or download this
    my $tmp_log = ($Output{host} ||= []);
    push @$tmp_log, $data;
    if (10 < @$tmp_log) {
      shift @$tmp_log;
    }
    
  2. or download this
    unless (exists $Output{host}) {
      $Output{host} = [];
    }
    my $tmp_log = $Output{host};