error in simulating an ftp client in perl

[aryan98876]

i am using array to store a command given at run time by user... and execute it.....but after a connection is made to any ftp sites only 'ls' or 'dir' commands work....and if i wish to change directory or get any file or put file.example
get("123.mp3")
put("abc.txt")
cd user
etc or any commands that has space in between
then it gives error.wat i cn do to get or put files ...

#!/usr/bin/perl
  
use Net::FTP;

        print("\nHost\/IP: ");
        $host = <STDIN>;
        chomp ($host);

        print("\nUsername: ");
        $username = <STDIN>;
        chomp ($username);
	print "Password: ";
	chop ($password = <STDIN>);
	`stty echo`;
	print "\n";

 print("Connecting to $host...\n");
 my $ftp = Net::FTP->new($host) or die "Couldn't connect to $host\n";
 print("Connected!\n");
 print("\nFTP>");

 $ftp->login($username, $password)
 or die "Could not log in .\n";
    
 rep:
            
 $command = <STDIN>;

 chomp ($command);

 unless ("$command" eq "bye") {      

                                       
                  @listing = $ftp->$command;
 
                  for($i=0;$i<@listing;$i++) { print "$listing[$i]\n"; }
      
                  print("FTP>");
                      
                  goto rep;

                               }