OSDN Git Service
(root)
/
squarantine
/
squarantine.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
84aedce8db6aeb379b6ea43d212cac3f20d32732
[squarantine/squarantine.git]
/
package
/
usr
/
bin
/
usbtest
1
#! /usr/bin/perl
2
open(FILE,">/tmp/usbtest") or die;
3
foreach my $key( keys %ENV ){
4
print FILE "$key: $ENV{$key}", "\n";
5
}
6
close(FILE);