年・月 | 学歴 |
<%
my $num = defined($var{data}{academic}) ? @{ $var{data}{academic} } : 0;
my $ac;
foreach my $i (1 .. $num) {
$ac = $var{data}{academic}[$i - 1]; %>
<% print "$ac->{year}年$ac->{month}月" %> |
<% print $ac->{career} %> |
<%
} %>
年・月 | 職歴 |
<%
my $num = defined($var{data}{business}) ? @{ $var{data}{business} } : 0;
my $bs;
foreach my $i (1 .. $num) {
$bs = $var{data}{business}[$i - 1]; %>
<% print "$bs->{year}年$bs->{month}月" %> |
<% print $bs->{career} %> |
<%
} %>
備考 |
<% print join(' ', split(/\n/, $cv->{note})); %> |