Help for this page

Select Code to Download


  1. or download this
    print( (sort @array)[0] );
    
  2. or download this
    my ($first) = sort @array;
    
  3. or download this
    use List::Util qw( minstr );
    
    print( minstr @array );