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
And the code is"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."
I would appreciate some help#!/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); }
In reply to random variable declaration based on given count by shan_emails
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |