Help for this page

Select Code to Download


  1. or download this
    foreach $file (@filelist)  {
  Parse::parse_file($file,$project,$date);
  Moving::move_file($file,$project,$date);
...
  2. or download this
    use vars qw ($project, $date)
....
return $project, $date