The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
#!/usr/bin/perl
# issues2excel.pl     yamamoto@nulab.co.jp     2007/11/16 03:59:04

use strict;
use warnings;

use Carp;
use Getopt::Long qw(:config no_ignore_case bundling);
use WebService::Backlog;

our $VERSION = $WebService::Backlog::VERSION;

my $projectId = undef;
my $out       = "";

sub export {
    my $projectId = shift or croak('Please specify projectId!');
    print "Exporting your issues on project[" . $projectId . "]...\n";
    my $backlog = WebService::Backlog->new();
}

=head1 NAME

issues2excel.pl

=head1 SYNOPSIS

=head1 DESCRIPTION


=head1 AUTHOR

Ryuzo Yamamoto, E <lt> yamamoto @ptahE < gt >

=head1 COPYRIGHT AND LICENSE

Copyright (C) 2007 by YAMAMOTO Ryuzo

This program is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.8.2 or,
at your option, any later version of Perl 5 you may have available.

=cut