Help for this page

Select Code to Download


  1. or download this
    #chomp() EXAMPLES
    $a = "abcdefghij";
    ...
    $a = "abcdefghij";
    $b = chop($a);
    print $b;  #this would return 'j'
    
  2. or download this
    $a = "abcdefghij\n";
    if ($a =~ /\n$/) { chop $a; } #this could also be \r\n if on windows p
    +latform