Changeset 26236 for branches/eam_branches/20091113/pstamp/scripts/pstamp_parser_run.pl

Timestamp:

Nov 20, 2009, 4:13:39 PM (17 years ago)

Author:

eugene

Message:

updates from head

File:

• branches/eam_branches/20091113/pstamp/scripts/pstamp_parser_run.pl (modified) (2 diffs)

branches/eam_branches/20091113/pstamp/scripts/pstamp_parser_run.pl

@@ -13 +13 @@
 use Getopt::Long qw( GetOptions );
 use File::Basename qw( basename dirname);
+use File::Copy;
 use POSIX qw( strftime );
 use Carp;
@@ -119 +120 @@
         unlink $new_uri or my_die("failed to unlink $new_uri", $req_id, $PS_EXIT_UNKNOWN_ERROR);
     }
-    if (! symlink $uri, $new_uri) {
-        my_die ("failed to link request file $uri to workdir $workdir", $req_id, $PS_EXIT_UNKNOWN_ERROR);
+    if (! copy $uri, $new_uri) {
+        my_die ("failed to copy request file $uri to workdir $workdir", $req_id, $PS_EXIT_UNKNOWN_ERROR);
     }
 }