Help for this page

Select Code to Download


  1. or download this
    my $keysForRE = join '|', keys %date_hash;
    while(<FILE>){
    ...
        # do stuff to $piece2
        $_ = join 'WARNING', ($piece1, $piece2);
    }