Revision 1963

View differences:

trunk/code/projects/traffic_navigation/grapher.pl
1
#!/usr/bin/perl
2

  
3
my $ifh = "derp.txt";
4
my $ofh = "graph.dot";
5

  
6
open $ifh, '<', $read_file or die ("WTF BEN!");
7

  
8
open $ofh, '>', $write_file or die ("Herp Derp");
9

  
10

  
11

  

Also available in: Unified diff