ОБЩЕМОСКОВСКИЙ СЕМИНАР АСТРОФИЗИКОВ
(ОСА)
Архив
";local( @dirlist );
opendir DIR, "./";
while( $item = readdir DIR ){
next if( $item =~ /^\./ );
next unless( -d $item );
push @dirlist, $item;
}
closedir DIR;
if( @dirlist ){
print '
- ';
- Семинар #$key";
}
print '
foreach $key (sort {$a <=> $b} @dirlist){
print "
}else{
print "
Архив пока еще пуст
\n";}
'
',
hr(),
qq'
Back to HOME
This page was designed by Sergey Nazin.
Send questions and comments to
leng\@sai.msu.su
';
# end_html();