Help for this page

Select Code to Download


  1. or download this
    my $list = "2-4,10-12";
    
    $list =~ s/\-/../g;
    my @array = eval( $list );
    
    # @array is now (2,3,4,10,11,12)
    
  2. or download this
    my @array = (2,3,4,10,11,12);
    
    my @vlans = ();
    ...
    my $list = join(',', @vlans);
    
    # $list is now "2-4,10-12" again