changeset 6:277edadeb167 draft

Deleted selected files
author deepakjadmin
date Thu, 15 Dec 2016 14:04:32 -0500
parents 9a001a14a022
children 1085e4f6d061
files test.pl
diffstat 1 files changed, 0 insertions(+), 14 deletions(-) [+]
line wrap: on
line diff
--- a/test.pl	Thu Dec 15 14:04:29 2016 -0500
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,14 +0,0 @@
-#!/usr/bin/perl -w
-use warnings;
-$out1 = $ARGV[0];
-$in1 = $ARGV[1];
-$fieldname = $ARGV[2];
-$idfiles = $ARGV[3];
-
-open(FILE, $idfiles) or die "Can't read file 'filename' [$!]\n";  
-@document = <FILE>; 
-close (FILE);
-$strw = join(",",@document);
-$strw =~ tr/\r\n//d;
-$fieldValues = join(",",$fieldname,$strw);
-system("mayachemtools/bin/ExtractFromSDFiles.pl -m datafieldbylist -d $fieldValues -r $out1 -o $in1" );