![]() |
|
|||
File indexing completed on 2024-04-06 11:57:57
0001 #!/usr/bin/env perl 0002 0003 use Term::ANSIColor; 0004 #use Date::Manip; 0005 use Cwd; 0006 0007 $linkName = @ARGV[0]; 0008 0009 #./Cosmics09_310/musecal/generatePrim.sh Cosmics09_310 0010 0011 while( 1 ) 0012 { 0013 0014 generate(); 0015 sleep 60; 0016 } 0017 0018 0019 sub generate{ 0020 0021 my $command1 = "./${linkName}/musecal/generatePrim.sh ${linkName} > ${linkName}/log/generatePrimSh.log"; 0022 system $command1; 0023 0024 } 0025 0026 exit; 0027
[ Source navigation ] | [ Diff markup ] | [ Identifier search ] | [ general search ] |
This page was automatically generated by the 2.2.1 LXR engine. The LXR team |
![]() ![]() |