diff options
author | epoch <epoch@hacking.allowed.org> | 2016-11-21 03:08:58 -0600 |
---|---|---|
committer | epoch <epoch@hacking.allowed.org> | 2016-11-21 03:08:58 -0600 |
commit | dcc04cba2446a7bfe8af8268229f3ca28e228b13 (patch) | |
tree | 8d441104cb47dc719aec20b97bdee70a70b9d4a7 /tools/obj2hackvr.pl | |
parent | 2ca9aa1c7fc8e39743e8aa8a2b715773657d3842 (diff) | |
download | hackvr-dcc04cba2446a7bfe8af8268229f3ca28e228b13.tar.gz hackvr-dcc04cba2446a7bfe8af8268229f3ca28e228b13.zip |
added an example use of hackvr with the filebrowser dir.
updated a bunch of stuff in hackvr needed to that that filebrowser working.
added a multicast example what uses mcast program in my misc repo.
updated obj2hackvr to require a filename as argument instead of using stdin
Diffstat (limited to 'tools/obj2hackvr.pl')
-rwxr-xr-x | tools/obj2hackvr.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/tools/obj2hackvr.pl b/tools/obj2hackvr.pl index a835d77..793b5ea 100755 --- a/tools/obj2hackvr.pl +++ b/tools/obj2hackvr.pl @@ -2,7 +2,7 @@ use strict; -die "usage: obj2hackvr.pl name\n" unless $ARGV[0]; +die "usage: obj2hackvr.pl name file\n" unless $ARGV[0]; my $i; my $j; @@ -14,7 +14,8 @@ my @parts; my @points; my @tmp; my $tmp; -while(<stdin>) { +open(FILE,$ARGV[1]) if $ARGV[1]; +while(<FILE>) { chomp; @linepart=split(/ /,$_,2); $com=$linepart[0]; |