sub main {
    my @fields = scalar(@_) ? @_ : @ARGV;
    ....
    return @result_set;
}