Select Code to Download

...
value for stairs.jpg is 99199
...
1 uploading stairs.webm
ftp return was stairs.webm
...

value for kitchen.m4v is 19297258
Net::FTP=GLOB(0x98127b4)>>> HELP SIZE
Net::FTP=GLOB(0x98127b4)<<< 214 Syntax: SIZE <sp> pathname
...
Net::FTP=GLOB(0x98127b4)>>> TYPE I
Net::FTP=GLOB(0x98127b4)<<< 200 Type set to I
1 uploading kitchen.m4v

sub upload {
  use strict;
  use warnings;
...

  return $html_return;
}

sub ftp_binary {
  use strict;
  use warnings;
...
  say "ftp return was $ftp_return";
  return $ftp_return;
}