Help for this page

Select Code to Download


  1. or download this
        my $outpath = "$outdir/$title";

    $outpath =~ s/(\.[^.]*|)$/$.$1/;