#!/usr/bin/perl -w
use strict;

my $arrayref;
@$arrayref;    # line 5
print "ok";