From adff44e0961b56052da9023d585d24bbdb462ff6 Mon Sep 17 00:00:00 2001
From: rajar <rajar@localhost>
Date: Wed, 2 Nov 2011 21:46:59 +0000
Subject: [PATCH] removed one file

svn path=/; revision=211
---
 Personnel/rajar/.gitignore |  0
 Personnel/rajar/orypf.pl   | 55 --------------------------------------
 2 files changed, 55 deletions(-)
 create mode 100644 Personnel/rajar/.gitignore
 delete mode 100644 Personnel/rajar/orypf.pl

diff --git a/Personnel/rajar/.gitignore b/Personnel/rajar/.gitignore
new file mode 100644
index 0000000..e69de29
diff --git a/Personnel/rajar/orypf.pl b/Personnel/rajar/orypf.pl
deleted file mode 100644
index 04f1630..0000000
--- a/Personnel/rajar/orypf.pl
+++ /dev/null
@@ -1,55 +0,0 @@
-#!usr/bin/perl
-#This program is written by Rajani Raja
-#This is a program to get .pf file used in strawberrycyc
-#===========================================================================
-# Enable Perl warnings
-#use strict;
-#use warnings;
-#use Array::Unique;
-
-#Load libraries
-
-
-
-$f2 = "ORY_PF.txt";
-open(FH2,$f2) || die ("could not open file!");
-@final =<FH2>;
-close FH2;
-$finalcnt =@final;
-print $finalcnt;
-print "\n";
-open(FH,">>orypf.txt");
-for($i=0;$i<$finalcnt;$i++)
-{
-
-if(@final[$i] =~ m/ID/)
-{
-#print FH "//";
-print FH @final[$i];
-#print FH "\t";
-}
-elsif(@final[$i] =~ m/FUNCTION/)
-{
-print FH @final[$i];
-#print FH "\t";
-}
-elsif(@final[$i] =~ m/EC/)
-{
-print FH @final[$i];
-#print FH "\t";
-
-}
-elsif(@final[$i] =~ m/SYNONYM/)
-{
-print FH @final[$i];
-#print FH "\t";
-}
-
-}
-
-close FH;
-
-$final2cnt =@final2;
-print $finalcnt;
-print "\n";
-#print $final2cnt;
-- 
2.34.1