- 求职 : 软件工程师
- 论坛徽章:
- 3
|
用 Golang 写了一段时间代码,发现字符串是各种语言唯一通用的数据结构。
下面就用 Golang 的思考模式,写一段高速字符缓冲的代码:
- use 5.024;
- my $buffer = buffer();
- Write($buffer, "123456");
- Write($buffer, "hello");
- say string($buffer);
- Reset($buffer);
- Write($buffer, "world");
- say string($buffer);
- sub buffer {
- my $str = q{};
- return \$str;
- }
- sub Reset {
- my $buffer = shift;
- ${$buffer} = q{};
- return 1;
- }
- sub string {
- my $buffer = shift;
- return ${$buffer};
- }
- sub Write {
- my ($buffer, $str) = @_;
- open my ($str_fh), '>>', $buffer;
- print {$str_fh} $str;
- return 1;
- }
复制代码 输出:
- $ perl buffer.pl
- 123456hello
- world
复制代码
|
|