Changeset 235
- Timestamp:
- 04/11/06 18:00:35 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/soft/ObsData/ourplugins/cr_sond_o3.pl
r234 r235 61 61 my $destfilename; 62 62 for ($datafile) { 63 /\.le1$/i and $destfilename = sprintf( 64 'cco%s%s%s%s%s.com', 65 $var{year}, $var{month}, $var{day}, 66 $var{hour}, $var{minute}, 67 ); 63 /\.le1$/i and do { 64 $destfilename = sprintf( 65 'cco%s%s%s%s%s.com', 66 $var{year}, $var{month}, $var{day}, 67 $var{hour}, $var{minute}, 68 ); 69 $var{level} = 'niveau2'; 70 }; 68 71 69 /\.DE1$/i and $destfilename = sprintf( 70 'cco%s%s%s%s%s.param', 71 $var{year}, $var{month}, $var{day}, 72 $var{hour}, $var{minute}, 73 ); 72 /\.DE1$/i and do { 73 $destfilename = sprintf( 74 'cco%s%s%s%s%s.param', 75 $var{year}, $var{month}, $var{day}, 76 $var{hour}, $var{minute}, 77 ); 78 $var{level} = 'niveau2'; 79 }; 74 80 75 /\.log$/i and $destfilename = sprintf( 76 'cco%s%s%s%s%s.preval', 77 $var{year}, $var{month}, $var{day}, 78 $var{hour}, $var{minute}, 79 ); 81 /\.log$/i and do { 82 $destfilename = sprintf( 83 'cco%s%s%s%s%s.preval', 84 $var{year}, $var{month}, $var{day}, 85 $var{hour}, $var{minute}, 86 ); 87 $var{level} = 'niveau1'; 88 }; 80 89 81 /\.cal$/i and $destfilename = sprintf( 82 'cco%s%s%s%s%s.cal', 83 $var{year}, $var{month}, $var{day}, 84 $var{hour}, $var{minute}, 85 ); 90 /\.cal$/i and do { 91 $destfilename = sprintf( 92 'cco%s%s%s%s%s.cal', 93 $var{year}, $var{month}, $var{day}, 94 $var{hour}, $var{minute}, 95 ); 96 $var{level} = 'niveau1'; 97 }; 98 99 /\.raw$/i and do { 100 $destfilename = sprintf( 101 'cco%s%s%s.raw', 102 $var{year}, $var{month}, $var{day}, 103 ); 104 $var{level} = 'niveau0'; 105 }; 106 107 /(...)\.dat$/i and do{ 108 $destfilename = sprintf( 109 'cco%s%s%s_%s.dat', 110 $var{year}, $var{month}, $var{day}, 111 uc($1), 112 ); 113 $var{level} = 'niveau0'; 114 }; 115 116 /\.mes$/i and do { 117 $destfilename = sprintf( 118 'cco%s%s%s.vol%s', 119 $var{year}, $var{month}, $var{day}, 120 $var{vol}, 121 ); 122 $var{level} = 'cr_vol_voemel'; 123 }; 86 124 87 /\.raw$/i and $destfilename = sprintf(88 'cco%s%s%s.raw',89 $var{year}, $var{month}, $var{day},90 );91 92 /(...)\.dat$/i and $destfilename = sprintf(93 'cco%s%s%s_%s.dat',94 $var{year}, $var{month}, $var{day},95 uc($1),96 );97 98 /\.mes$/i and $destfilename = sprintf(99 'cco%s%s%s.vol%s',100 $var{year}, $var{month}, $var{day},101 $var{vol},102 );103 125 } 104 126
Note: See TracChangeset
for help on using the changeset viewer.