1: 2: 3: 4: 5: 6:
1: 2: 3: 4: 5: 6: 7: 8:
custom_file_parse secundario { mi $file = cambio; abrirse (INFILE, “<>; ¡cerrar (INFILE) o morir $! ; mi $text = ensamblan ("", @arr); vuelta ($template, $ID, $title, $text); }