Changeset 944


Ignore:
Timestamp:
Jan 28, 2009, 1:19:31 PM (13 years ago)
Author:
Martin Svensson
Message:

References #173 The 'float to integer' conversion has been removed but needs to be tested.
Notice: The documentation link on http://baseplugins.thep.lu.se/wiki/net.sf.basedb.illumina, concerning this file, should be updated when releasing version 1.3

File:
1 edited

Legend:

Unmodified
Added
Removed
  • plugins/base2/net.sf.basedb.illumina/trunk/contrib/beadstudio2ibs.pl

    r940 r944  
    2929use IO::File;
    3030use Pod::Usage;
    31 use POSIX;
    3231
    3332# initialize user-definable parameters to default values
     
    146145  $sample_probes{$line[scalar(@line)-1]}=1;
    147146        print $fh "$line[scalar(@line)-1],$line[$i+2]," .
    148       POSIX::floor($line[$i]) . "," . POSIX::floor($dev). "\n";
     147      $line[$i] . "," . $dev. "\n";
    149148    }
    150149}
     
    210209  if(!exists($sample_probes{$line[0]})) {
    211210      $sample_probes{$line[0]}=1;
    212       print $fh "$line[0],$line[$i+2]," . POSIX::floor($line[$i]) .
    213     "," . POSIX::floor($dev) . "\n";
     211      print $fh "$line[0],$line[$i+2]," . $line[$i] .
     212    "," . $dev . "\n";
    214213  }
    215214    }
Note: See TracChangeset for help on using the changeset viewer.