Select Code to Download

while ( ... ) {
    unless ( some-condition ) {
...
    }
    some-code
}

while ( ... ) {
    if ( some-condition ) {
        some-code
    }
}

while ( <DATAFILE> ) {
    chomp;
...

    #do something with $quote, $hours, $minutes, $seconds & $comment
}