mirror of
https://github.com/nillerusr/source-engine.git
synced 2024-12-22 22:27:05 +00:00
22 lines
412 B
Perl
22 lines
412 B
Perl
|
use File::DosGlob;
|
||
|
@ARGV = map {
|
||
|
my @g = File::DosGlob::glob($_) if /[*?]/;
|
||
|
@g ? @g : $_;
|
||
|
} @ARGV;
|
||
|
|
||
|
open FILE, ">__tmpshaderlist.txt";
|
||
|
|
||
|
foreach $arg (@ARGV)
|
||
|
{
|
||
|
if( $arg =~ m/\.fxc$/i || $arg =~ m/\.vsh$/i || $arg =~ m/\.psh$/i )
|
||
|
{
|
||
|
print $arg . "\n";
|
||
|
print FILE $arg . "\n";
|
||
|
}
|
||
|
}
|
||
|
|
||
|
close FILE;
|
||
|
|
||
|
system "buildshaders.bat __tmpshaderlist";
|
||
|
|
||
|
unlink "__tmpshaderlist.txt";
|