#!/usr/bin/perl -w

my $STDCELLLIB=$ENV{'STDCELLLIB'} || "/home/philipp/libresilicon/StdCellLib";
my $CARAVEL=$ENV{'CARAVEL'} || "/media/philipp/Daten/skywater/caravel-stdcelllib-stdcells";

open OUT,"|magic -noconsole -T sky130A";
foreach(<$CARAVEL/cells/lef/*.lef>)
{
  print OUT "lef read $_\n";
} 
print OUT "def read ".$ARGV[0]."\n";
#print OUT "select top\n";
close OUT;