如何打印字符串的开头?

San*_*ing -8 perl

如果我有

$t = '20110512102331';
Run Code Online (Sandbox Code Playgroud)

并且只想要前4个字符$t.

我怎么做?

MD *_*med 6

通过使用这样的substr函数 -

my $t = "20110512102331";
my $four = substr($t, 0, 4)
Run Code Online (Sandbox Code Playgroud)