History | View | Annotate | Download (165 Bytes)
#!/usr/bin/perl
my $ifh = "derp.txt";
my $ofh = "graph.dot";
open $ifh, '<', $read_file or die ("WTF BEN!");
open $ofh, '>', $write_file or die ("Herp Derp");