Escape literal "@" in string

diff --git a/lib/ftp.pl b/lib/ftp.pl
index f366cdb..bfddcb8 100644 (file)
--- a/lib/ftp.pl
+++ b/lib/ftp.pl
@@ -245,7 +245,7 @@ sub ftp'login
        local( $remote_user, $remote_password ) = @_;
 
        if( $proxy ){
-               &ftp'send( "USER $remote_user@$site" );
+               &ftp'send( "USER $remote_user\@$site" );
        }
        else {
                &ftp'send( "USER $remote_user" );