--- loncom/interface/test/lonmysqltest.pl	2005/02/21 17:25:34	1.1
+++ loncom/interface/test/lonmysqltest.pl	2005/02/21 18:07:30	1.2
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 # The LearningOnline Network with CAPA
 #
-# $Id: lonmysqltest.pl,v 1.1 2005/02/21 17:25:34 matthew Exp $
+# $Id: lonmysqltest.pl,v 1.2 2005/02/21 18:07:30 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -44,7 +44,7 @@ ok(&create_test_db(),'database creation'
                                                $supersecretpassword,
                                                'lonmysqltest');
 &Apache::lonmysql::connect_to_db();
-my @letters = qw/a b c d e f g h i j k l m n o p q r s t u v w x y z/;
+my @letters = ('a'..'z');
 foreach my $letter (@letters) {
     my $tablename = '1234'.$letter.'5678';
     ok(&test_table_name_creation($tablename),'creating '.$tablename);