abccdddaaaaa
01001110000011111111

##</code><code>##

#!/usr/bin/perl -w
use strict;
while(<DATA>){
    chomp;
    print "$_\n" if is_fibo($_);
}
sub is_fibo {
    # deleted
}
__DATA__
Pass
abaabbbaaaaabbbbbbbbaaaaaaaaaaaaa
a aa   aaaaa
@!%%+++*****
Isee
Fail
aaaaaaaaaaaa
abbcccddddd
ab


OUTPUT:
Pass
abaabbbaaaaabbbbbbbbaaaaaaaaaaaaa
a aa   aaaaa
@!%%+++*****
Isee