Necesito de su orientación ya que estoy haciendo un programilla para abrir archivos con día juliano mediante la función getOpenFile, el problema es que no todos los archivos los reconoce.. ¿¿¿alguna idea???
Using perl Syntax Highlighting
for (1..365) {
push(@A,"*.$_");
}
$type=[
['Archivo Validado', "@A", ],
['All Files', '*', ],
];
$filename = $m->getOpenFile(
-filetypes => $type,
-initialdir => Cwd::cwd(),
-initialfile=> "",
-title => "Abrir Archivo"
);
push(@A,"*.$_");
}
$type=[
['Archivo Validado', "@A", ],
['All Files', '*', ],
];
$filename = $m->getOpenFile(
-filetypes => $type,
-initialdir => Cwd::cwd(),
-initialfile=> "",
-title => "Abrir Archivo"
);
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
