#!/usr/bin/perl

@conditions = ("S", "E2h", "E6h", "E24h");
@reps = (1,2,3);

foreach $cnd (@conditions) { foreach $rep (@reps) {
  $id = "$cnd-$rep";
  $newfile = "$id.normDepth_plus_strand.RNAseq.bigWig"; unless (-e $newfile) { print "ln -s $id.str2.norm.bigWig $id.normDepth_plus_strand.RNAseq.bigWig\n"; }
  $newfile = "$id.normDepth_minus_strand.RNAseq.bigWig"; unless (-e $newfile) { print "ln -s $id.str1.norm.bigWig $id.normDepth_minus_strand.RNAseq.bigWig\n"; }
} }

$dir = "/data/wade/korach/sylvia/RNAseq_jun2016";
foreach $cnd (@conditions) { foreach $rep (@reps) {
  $id = "$cnd-$rep";
  print "$id\t$dir/$id.normDepth_plus_strand.RNAseq.bigWig,$dir/$id.normDepth_minus_strand.RNAseq.bigWig\n";
} }