diff --git a/qa/workunits/rgw/s3_bucket_quota.pl b/qa/workunits/rgw/s3_bucket_quota.pl
index 091cbc97747..ae6e273a17a 100755
--- a/qa/workunits/rgw/s3_bucket_quota.pl
+++ b/qa/workunits/rgw/s3_bucket_quota.pl
@@ -53,7 +53,8 @@ my $kruft;
 my $s3;
 my $domain   = "front.sepia.ceph.com";
 my $host     = get_hostname();
-our $hostname = "$host.$domain:7280"; # as rgw is running on port 7280
+my $port     = $ENV{RGW_PORT}||7280;
+our $hostname = "$host.$domain:$port";
 our $testfileloc;
 my $rgw_user = "qa_user";
 
diff --git a/qa/workunits/rgw/s3_multipart_upload.pl b/qa/workunits/rgw/s3_multipart_upload.pl
index 449d212a1e7..58be2aeae01 100755
--- a/qa/workunits/rgw/s3_multipart_upload.pl
+++ b/qa/workunits/rgw/s3_multipart_upload.pl
@@ -48,7 +48,8 @@ Pod::Usage::pod2usage(-verbose => 1) && exit if ($help);
 my $s3;
 my $domain   = "front.sepia.ceph.com";
 my $host     = get_hostname();
-our $hostname = "$host.$domain:7280";
+my $port     = $ENV{RGW_PORT}||7280;
+our $hostname = "$host.$domain:$port";
 our $testfileloc;
 our $mytestfilename;
 
diff --git a/qa/workunits/rgw/s3_user_quota.pl b/qa/workunits/rgw/s3_user_quota.pl
index 985d82f7fa2..045d297a701 100755
--- a/qa/workunits/rgw/s3_user_quota.pl
+++ b/qa/workunits/rgw/s3_user_quota.pl
@@ -52,7 +52,8 @@ my $kruft;
 my $s3;
 my $domain   = "front.sepia.ceph.com";
 my $host     = get_hostname();
-our $hostname = "$host.$domain:7280";
+my $port     = $ENV{RGW_PORT}||7280;
+our $hostname = "$host.$domain:$port";
 our $testfileloc;
 our $cnt;