#!/usr/local/bin/perl
use strict;
use warnings;

my @fav_game = ('ruiner', 'ps4/steam', 2017, '$19.8');
($name, $hard, $year, $price ) = my @spac;

print $name;