#!/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");



