Parent Directory | Revision Log | Patch
perl/trunk/test/s/mount.t revision 4 by mszeredi, Thu Nov 11 14:44:15 2004 UTC | perl-llin/test/s/mount.t revision 22 by dpavlin, Mon Jan 2 20:29:57 2006 UTC | |
---|---|---|
# | Line 9 if(!fork()) { | Line 9 if(!fork()) { |
9 | #close(STDIN); | #close(STDIN); |
10 | close(STDOUT); | close(STDOUT); |
11 | close(STDERR); | close(STDERR); |
12 | mkdir $_point; | |
13 | mkdir $_real; | |
14 | `echo $$ >test/s/mounted.pid`; | `echo $$ >test/s/mounted.pid`; |
15 | exec("perl $_loop $_point"); | diag "mouting $_loop to $_point"; |
16 | exec("perl -Iblib/lib -Iblib/arch $_loop $_point"); | |
17 | exit(1); | exit(1); |
18 | } | } |
19 | select(undef, undef, undef, 0.5); | select(undef, undef, undef, 0.5); |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |