p4bccheckout.pl

来自「hl2 source code. Do not use it illegal.」· PL 代码 · 共 8 行

$file = shift;
$path = $file;
$path =~ s/\\[^\\]*$//;
chdir $path;
exec "p4 edit $file";