Help for this page

Select Code to Download


  1. or download this
    my ($body) = $line =~ /^body: \n (.*) \n attachment/xsi;
    
  2. or download this
    # this is from perlop
    while (<>) {
    ...
            # ...
        }
    }