Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re: Re: Using expressions in arrays for pattern matching

by yosefm (Friar)
on Dec 01, 2003 at 22:29 UTC ( [id://311425] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my $thisout = substr($i, 0, index($i, ".")) . ".txt"
    
  2. or download this
    $file =~ s/\.rpt$/.txt/i; #case insensitive
    open OUTPUT, ">$file";