Hi Team

I need to generate and declare the random variable based on the given count. I have tried like below but it throws error like below

"Can't modify concatenation (.) or string in scalar assignment at test
+pl.pl line 16, near "$n;"
Execution of testpl.pl aborted due to compilation errors."
[download]

#!/usr/bin/perl
use strict;
my $txt='some';
my $arg_cnt=3;
my ($rv1,$rv2,$rv3)=&get_val($arg_cnt);
print "rv1:$rv1\n";
print "rv2:$rv2\n";
print "rv3:$rv3\n";

sub get_val {
    my $cnt = shift;
    # generate random and declare variable depends on $cnt value
    my $random_var; 
    my ($var,$var1,$var2,$var3,$var4,$var5,$var6,$var7,$var8,$var9,$va
+r10,$var11,$var12,$var13);
    for my $n (1..$cnt){
        $var.$n = $n;
        $random_var .= '$var'."$_".',';
    }
    $random_var =~ s/\,$//;
    print "get_var: $random_var\n";

    return($random_var);
}
[download]