linux vi从当前行复制到文件尾的命令？

linux vi从当前行复制到文件尾的命令操作方法；
1.转到末行模式，
>SHIFT+;，
>set number(弄出行号)，
当前行号 co 最后一行的行号。

2.如果当前行号 co 最后一行的行号，
>就这样操作:，
当前行号,当前行的下一行 co 最后一行的行号，
然后再把当前行的下一行，
>这一行给去掉就行了。

光标移动到想复制的第一行,SHIFT V,再SHIFT G,再: 处输入命令 tee -a c.txt

首先：
转到末行模式
>SHIFT+;
>set number(弄出行号)
当前行号 co 最后一行的行号
搞定.
如果
当前行号 co 最后一行的行号
>这条不行的话，你就这样:
当前行号,当前行的下一行 co 最后一行的行号
然后再把
当前行的下一行
>这一行给去掉就行了.
不会再联系我.

基於linux 的精神，这个该用sed来做吧,假设文件这样

nc10@your-5554c55be4 ~
$ cat bin/funfacts.pl
#! /usr/bin/perl
#funfacts.pl by twfccc@gmail.com, public domain

use strict;
use warnings;
use LWP::Simple;

my $url = "http://www.cs.cmu.edu/~bingbin/";
my $fact = get($url) or die "Could not open $url: $!\n";
$fact =~ s/<[^>]+>//g;
$fact =~ s/>+//g;
my @fact = split(/\n/, $fact);
my $size = @fact;
srand();
my $random = int( rand() * $size * $$ ) % $size;
my $x = $fact[$random]?$fact[$random]:$fact[$random + 1];

print "\n$x\n\n";

我想由my $url 到文件末复制到另一文件, 这样

nc10@your-5554c55be4 ~
$ sed '/\$url/,$!d' bin/funfacts.pl
my $url = "http://www.cs.cmu.edu/~bingbin/";
my $fact = get($url) or die "Could not open $url: $!\n";
$fact =~ s/<[^>]+>//g;
$fact =~ s/>+//g;
my @fact = split(/\n/, $fact);
my $size = @fact;
srand();
my $random = int( rand() * $size * $$ ) % $size;
my $x = $fact[$random]?$fact[$random]:$fact[$random + 1];

print "\n$x\n\n";

nc10@your-5554c55be4 ~
$ sed '/\$url/,$!d' bin/funfacts.pl > somejunk

nc10@your-5554c55be4 ~
$ cat somejunk
my $url = "http://www.cs.cmu.edu/~bingbin/";
my $fact = get($url) or die "Could not open $url: $!\n";
$fact =~ s/<[^>]+>//g;
$fact =~ s/>+//g;
my @fact = split(/\n/, $fact);
my $size = @fact;
srand();
my $random = int( rand() * $size * $$ ) % $size;
my $x = $fact[$random]?$fact[$random]:$fact[$random + 1];

print "\n$x\n\n";

nc10@your-5554c55be4 ~
$

这样比用vim/vi手动快多了，且不会错，对吗？呵呵