__PACKAGE__->mk_accessors(qw/filename size tempname type/);
+sub new { shift->SUPER::new( ref( $_[0] ) ? $_[0] : {@_} ) }
=head1 NAME
=over 4
-=item $upload->new
-
-Constructor. Normally only for engine use.
-
-=cut
-
-sub new { shift->SUPER::new( ref( $_[0] ) ? $_[0] : {@_} ) }
-
=item $upload->copy_to
Copies tempname using C<File::Copy>. Returns true for success, false otherwise.