Language Basics Perl

  1. Home
  2. Perl
  3. Language Basics
  4. @a1 = $v1 1 10
$v1 = 0;
@a1 = $v1 && 1 .. 10;
print join (" ", @a1);